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.REM § 



SEQ 0001 



PRODUCT CODE I 
PRODUCT MAmt 
PRODUCT DATE^ 
MilHtllMERl 



IDEMTIFICATIOS 

IC-E950B-MC 
CXKHCBO KMC~11 MODULE 
SEPTEMBER 1978 
DEC/Ill SUPPORT GROUP 



THE IHFORMATIOi IM THIS DOCUMEMT IS SUBJECT TO CHIMGE 
MITHQUT iOTICE liD SHOULD MOT BE COMSTRUED AS I COP^ITMEST 
BY DIGITAL EQUIPMEHT CORPORITIOW. DIGITIL EQUIPMENT 
CORPORATIOi iSSUHES iO RESPOMSIBILITY FOR AMY ERRORS THAT 
MAY APPEAR lU THIS MAMUAL« 

THE SOFTWARE DESCRIBED IM THIS DOCUHEMT IS FURiIS8ED TO THE 
PURCHASER UNDER A LICEISE FOR USE 0^ A SIWGLE COMPUTER 
SYSTEM AMD CAM BE COPIED (WITH liCLUSIOH OF DIGITALS 
COPYRIGHT NOTICE) OMLY FOR USE IM SUCH SYSTEM^ EXCEPT AS MAY 
OTHERMISE BE PROVIDED I^ MRITI^G BY DIGITAL^ 

DIGITAL EQUIPMEiT CORPORATION ASSUMES 10 RESPONSIBILITY FOR 
THE USE OR RELIABILITY OF ITS SOFTWARE Oi EQUIPMEMT THAT IS 
HOT SUPPLIED BY DIGITAL* 

COPYRIGHT (C) 1976^1978 DIGITAL EQUIPMEI^T CORPORATION 



PROGRAM TO omm 



mm DEC/Xll SYSTEM EXERCISER MODULE MICYll 30A(1052) 12-0CT-78 16:40 PiGE 3 
XKMCBO.Pll 12-0CT-78 12202 

34 1„ ABSTRACT 
35 

36 KMC IS AM lOMOD THAT EXERCISES UP TO AND II^CLUOIMG TMO 

37 CONSECUTIVELY ADDRESSED AND CONSECUTIVELY VECTORED KNCll 

38 SYMCHROMDUS INTERFACES, IT USES NO LIME UMIT FOR RECEIVING 

39 AND TRANSMITTIHG DATA, DATA BUFFERS ARE TRANSMITTED AMD 

40 RECEIVED FROM PDPll HEMORY TO KMCll & VICE VERSA. 

41 THE RECEIVER AfID TRANSMITTER ISR'S ARE PERFORHED 

42 AT LEVEL (PIRQ) .DATA CHECKING IS PERFQRB^ED AT LEVEL 

43 AND DONE OUTSIDE THE ISRS, 
44 

45 2« REQUIREMENTS 
46 

47 HARDMARES AT LEAST 1 KMCll 
48 

49 STORAGES KMC REQUIRES; 

50 1, DECIMAL WORDSS 2235 

51 2. OCTAL «CRDS2 04273 

52 3, OCTAL BYTES: 10566 
53 

54 

55 3. PASS DEFINITION 

57 ONE PASS OF THE KMAA MODULE CONSISTS OF TRANSMITTING AND 

58 RECEIVING 1 BUFFERS OF 2-512 CHARACTERS 200 TIMES FOR EACH SELECTED 

59 DEVICE, 
60 

61 4- EXECUTION TIME 

63 RUNNING ALONE ON AN 11/45 ONE PASS TAKES APPROXIMATELY 

64 ONE MINUTE, IF RUN AT XX BAUD AND XX BUFFER SIZE 
65 

66 5, CONFIGURATION PARAMETERS. 

68 DEFAULT PARAMETERS2 

69 ADDRS 1^ VECTORS 1, ERlS 5, BR2S 5, DVlDl: 1. SRllO 

70 KMAA MILL RUN UP TO TMO CONSECUTIVELY ADDRESSED AND 

71 CONSECUTIVELY VECTORED KMCll 'S. THERE ARE THREE 

72 PARAMETERS WHICH CAN BE CONTROLLED IN THIS MODULE. 

73 l.NPR rate:- this CONTROLS THE RATE OF NPR'S 

74 OCCURING FROM KMCll'S. USING MODIFY COMMAND THIS CAN BE 

75 SET TO SPECIFIC VALUE, THE ADDRESS OF THIS PARAMETER IS 

76 226 IN KMAA MODULE. 

77 THIS PARAMETER CAN BE CHOSEN IN TMO DIFFERENT ^AYS. 

78 I. WHEN SR1<BIT15>S=1 THEN WHATEVER IN LOC 222CRTMULV3 

79 IS LOADED INTO NPRATE L0CATI0NC2261. 

80 II.aHEN SR1<BIT14>2=1 THEN NPRATE BECOMES EQUAL TO 

81 RTMULV MULTIPLIED BY SRl<6sll>. 

82 DEFAULT;; 10000COCTAL3 

83 range:; 12-7888 USEC/NPR- 
84 

85 2.MPR/BR RATES- CONTROLS THE RATE OF MPR'S PER INTERRUPT. 

86 LIKE NPR RATE THIS PARAMETER CAN ALSO BE CHOSEN IN TMO 

87 DIFFERENT WAYS. IN THIS CASE SZMULVi:2201 ^ILL EE USED 

88 IN PLACE OF RTMULV. AND SR1<0:5> CONTENTS ilLL BE USED TO MULTIPLY, 

89 PARAMETERS ; : RSIZE(202),XSIZE(204) 
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SEQ 0003 



COHH^HD 

THE DIRECTION OF NPR'S 



DEFAULT:: 377(0CTAL) 

RA^IGESI 1-377(0CTAL) 

CAM BE SET USIIIG Pm 

3»DIRECTI0II OF NPR'Sl _ _ 

CAN BE CHOSEN SETTTI^G PROPER BIT IN SRI 
SXPLANATIOl FOLLOliS 



DEVICE/QPTIQI^ SETOP 



SRKSMITCH REGISTER CONTENTS) OPTION* 



BIT15S1 I-E SRIUOXXXX 

BIT14n I«E SR1S04XXXX 

BIT 15 1420 

BIT 15 & 14sl 

BIT13n I.E SR1SX2XXXX 

BIT12I1 I«E SRlJXlXXXX 

BIT13 & 12:0 

BIT13 & 12M 

SRI BITS 6:11 

SRI BITS 5S0 



flPRATE:= RTMUL¥ * SRI <6:11> 

KPR/BR2= SZI40LV * SRI <0:5> 

NPRATE2= RTHUL¥ 

iPR/BR:= SZ«UL¥ 

DEFAULT RATE, 

ILLEGAL. 

XMIT ONLY, 

RSCEI¥E DULY 

DEFAULT, 
ILLEGAL, 

MPR RATE MULTIPLIER, 
!IPR/eR RATE MULTIPLIER* 



MOTES 



SRI CA^ BE SET UP AT COI^F IGURATIO^ TIME OR 
AT mn TIME ilTH A HOD COMMAND* 
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XKPCBO^Pll 12-OCT-78 12S02 SEQ 0004 

120 7» MODULE OPERATIOM 

121 

122 1, LOAD SOFTWARE PQIHTERS IN LINK TABLE* SET PARAMETERS^ 

123 2« LOAD VECTORS AID PRIORITIES IN TABLE 

124 3, LOAD MICRO-CODE^fERIFY IT Af^D II^ITIATE IT« 

125 4« ENABLE SELECTED DEVICES. 

126 5, SCAH FOR ALL DEVICES TO FIMISH 

127 6, IF mi DONE GO TO 4, 

128 IF HUiG REPORT SO AiD DROP HORG DEVICE* 

129 7- CHECK DATA FOP ALL DEVICES SELECTED* 

130 8« DECREMEMT ITERATIOi COD!IT 

131 9, IF HOT = GO TO 1 

132 10. SIGSAL ESDPASS, 
133 

134 IISRS IMPOT INTERRUPT SERVICE ROUTINE. 

135 II. GET IHTERRUPTIHG KMCSCR. 

136 13. IF RECEIVE BA/CC MAS REQUESTED^ LOAD REC BA/CC» 

137 14. IF XMIT BA/CC MAS REQUESTED, LOAD XMIT BA/CC. 

138 15. RTI 
139 

140 OISRS OUTPUT INTERRUPT SERVICE ROUTINE, 

141 01. GET IHTERRUPTING KMCSCR 

142 02. IF ERROR^ REPORT IT AND EXIT. 

143 03- IF XMIT DOHE OR REC DONE, SET APPROPRIATE BITS IN 

144 THE EMDPASS FLAG FOR THE DEVICE. 

145 04. RTI 
146 
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9, NON-STAMDARD PRINTOUTS 

IF THE MODULE "HANGS" IH UmCH MOT ALL SELECTED DEVICES 
HAVE Flf^ISHED^ THEU A "HUHG" MESSAGE IS PRINTED OUT* 
CHECK THE EiDPASS FLAGS FOR EACH SELECTED DEVICE lU 
THE LIMK TABLE TO DETERMINE iHICH DEVICE FAILED TO 
FINISH Am HOM FAR IT GOT« 

FOR EXAMPLES 

THE TI^^O EMDPASS FLAGS ARE LOCATED IH THE LIMK TABLE 

(liTLHK) AT THE FOLLOyiMG LOCITIOWS. 

XXllS 

XX21: 



ONLY BITS THRU 
BITl = 1 
BITO = 1 
BIT2 = 1 
BIT3 = 1 



3 ARE USED AMD ARE DEFINED AS FOLLOiS : 
RECEIVE BA/CC'S WERE LOADED* 
TRAI^SMIT BA/CC'S mm LOADED* 
TRAMSHIT OOMS'S MERE RECEIVED, 
RECEIVE DOLE'S iERE RECEIVED, 



A CORRECT EI^D PASS FLAG = 17^ MBEH THE EKDPASS FLAGS 
= 17 FOR THE SELECTED DEVICES. THE DATA IS CHECKED, IF 
A "HUHG" MESSAGE IS TYPED IT IS BECAUSE ONE OR BOTH 
DEVICES DID liOT FINISH* TO FIMD «HICH OHE, CHECK THE 
EMD PASS FLAGS4. AHY THAT ARE MOT EQUAL TO 17 ARE THE 
HUMG DEVICES. CHECK MHICH BITS OF THE ENDPASS FLAG ARE 
CLEAR TO SEE MHAT IT MkS TRYIMG TO D0« 
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MODULE 
.TITLE 
DDXCOH 
.LIST 



lOMODCKMCB >/ 1 / I ,5,5 ,0/ 200, 1 36 
140000, KMCB ,1/1,5^5,0,200,136 
KMCB DEC/Xll SYSTEM EXERCISER NODULE 
VERSION 6 23-MAY-78 



. ******************************** 



BEGIK: 

hodnam: 

XFLAG: 

ADDR: 

VECTOR: 

BRl: 

BR2: 

DVIDl: 

SRl: 

SR2: 

SR3: 

SR4: 

STAT: 

INIT: 

spoint: 

pascht: 

icont: 

icount: 

sofcnt: 

hrdcnt: 

SOFPAS: 
HRDPAS: 

syscht: 
rannuh: 

CONFIG: 

RESi: 

RES2: 

SVRO: 
SVRI: 

SVR2: 
SVR3: 
SVR4: 
SVR5: 
SVR6: 

csra: 
sbadr: 
acsr: 
wasadr: 

ASTAT: 

errtyp: 

asb: 

AWAS: 

rstrt: 

wdto: 

mdfr: 

INTR: 
idnum: 

modsp: 



.ASCII 

.BYTE 

1 + 

1+0 

.BYTE 

.BYTE 

0+1 

OPEN 

open 
open 

OPEN 

140000 

START 

MODSP 



200 


















OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 

OPEN 

OPEN 

OPEN 
OPEN 
RESTRT 

OPEN 
OPEN 
OPEN 
136 



/KMCB 
OPEN 



PRTY5+0 

PRTY5+0 



;module nahe. 

jused to keep track of mbuff usage 

;1ST device ADDH. 

1ST device vector. 

1ST BR LEVEL. 
2ND BR LEVEL. 
DEVICE indicator 1. 
SWITCH REGISTER 1 
switch REGISTER 2 
SWITCH REGISTER 3 
SIsITCH REGISTER 4 

STATUS WORD, 
MODULE START ADDR. 
MODULE STACK POINTER. 

PASS COUNTER. 

M OF ITERATIONS PER PASS=200 
LOG TO COUNT ITERATIONS 
LOC TO SAVE TOTAL SOFT ERRORS 
,LOC TO SAVE TOTAL HARD ERRORS 
?LOC TO SAVE SOFT ERRORS PER PASS 
LOG TO SAVE HARD ERRORS PER PASS 
« OF SYS ERRORS ACCUMULATED 
HOLDS RANDOM # WHEN RAND MACRO IS CALLED 
RESERVED FOR MONITOR USE 
RESERVED FOR MONITOR USE 
RESERVED FOP MONITOR USE 
LOC TO SAVE RO. 
LOC TO SAVE Rl. 
LOC TO SAVE R2. 
LOC TO SAVE R3. 
LOC TO SAVE R4. 
LOC TO SAVE Rb. 
LOC TO SAVE R6. 
ACDR OF CURRENT CSR. 
ADDR OF GOnO DATA, OR 
CONTENTS OF CSR. 
ADDR OF BAD DATA, OR 
STATUS REG CONTENTS. 
TYPE OF ERROR 
EXPECTED DATA. 
ACTUAL DATA. 

RESTART ADDRESS AFTER END OF PASS 
WORDS TO MEMORY PER ITERATION 
WORDS FROM MEMORY PER ITERATION 
# OF INTERRUPTS PER ITERATION 
MODULE IDENTIFICATION NUMBEP=136 



283 
284 
285 
2 86 
287 
288 
289 
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234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 

m 

254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 
273 
274 
275 

il^ 

278 
279 
280 



000224' 
000226- 
000230' 
00Q232' 
000234' 
000236' 
000240' 
000242' 
000244' 
000246' 
000250' 
000252' 
000254' 
000256' 
000260' 

000262' 
000263' 



000000 
000000 
000000 
000017 
000000 
000000 
000377 
000377 

000000 
000000 
QOOOOO 
000002 
000100 

oooogg 

000 

OlOOOQ 

000000 

000270' 000000 



000266 

"""17' 
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81 000272' 005067 

82 000276' 032767 
~~ 000304- 001004 

000306- 016767 
000314' 001002 
000316' 
000316' 
000322' 
000326' 



177772 
177774 



177502 177714 



VARIABLES FOR KMCll 

*****ik ********* ******* 



************** 



***************** 



6ly1: 
DLY2: 
SELECT! 

flagb: 

FIRST: 

MASK: 

rsize: 

XSIZE: 

VAI 

PA: 

ea: 

SARO: 

SARI: 

SZMULV! 

RTMULV: 

TERM= 

RCOLY: 

xmoly: 

NPRTE: 
TEMP: 

flag: 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.MQRD 
.WORD 
.WORD 
.fdORD 
.MURD 
.»ORD 
.WORD 
.WORD 
.HORD 
.WORD 


.BYTE 
.BYTE 
.EVEN 
.WORD 
.WORD 
-'<IORD 





17 




377 

377 











2 

100 




10000 



;DEVICE 1 DELAY COUNT. 
;DEVICE 2 DELAY COUNT. 
;TEMPORARY SELECTED DEVICE'S 
;END PASS FLAG. 
;FIRST PASS FLAG. 
;TEMPnRARY VARIABLE. 
JRECEIVE BUFFER SIZE. 
;TRANSMIT BUFFER SIZE. 
;VIRTUAL ADDRESS. 
;PHYSICAL ADDRESS. 
;EXTENDSD ADDRESS. 
;SAVE LOC. FOR RO. 
;SAVE LOC. FOR Rl 

;LOCATIQN USED TO CALCULATE NPR/BR RATE. 
;LOCATiaN USED TO CALCULATE NRR RATE. 
JTERMINATING VALUE. 
;XM1TR ONLY FLAG=SP AD<16> 
JRCV ONLY FLAG=SPAD <15> 

;LOCATION FOR NPR RATE. 
TEMPORARY VARIABLE. 
;HSED to LOAD MAIN MEMORY. 



J***************************** 



BEGIN THE DEC./Xll MODULE FOR THE KMCll 



CLR 
BIT 
BNE 
MOV 
BNE 



FLAG 

#''C<3>, DVIDl 
DROP 

DVIDl, SELECT 
RESTRT 



104410 
005067 
012700 



177706 
005276' 



RESTRT: 
LOOP: 



ENDS, BEGIN 

CLR FIRST 

MOV #RBUF11,R0 



;SET FDR FIRST PASS... 

;DROP MODULE IF OTHER THEN 

;FIRST 2 DEVICES ARE SELECTED 

;SEL ECT=ACTI VE DEVICES. 

;DR0P MODULE IF NO ACTIVE DEVICES. 



JINITIALIZE THE FIRST TIME FLAG. 
;GET SET TO CLEAR BUFFERS. 
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1$: CLR (R0)4- JCLEAR THE LOCATION IN BUFFER. 

CMP ROi-iBaSEl ?END OF BUFFERS? 




BLE IS ;N0 GO CLEAR THE NEXT... 

MaV SELECT^RO SHQ=ACTIVE BITS. 

BEQ DROP JDROP MODULE IF NO DEVICES SELFCTEO 

TST FLAG J IS IT FIRST PASS??? 

BNE SETUPl )NO,THEN DONT LOAD THE MICRO-CCDR.. 



« ****** ************************************************ ******* 



V 

I I. THIS PART SETS UP PARAMETERS COMMON TO ALL 

} DEVICES LIKE: 1)NPR/BR RATE. 

J 25nPR RATE. 

; 33D1RECTION OF NPR. 

; II. INITIATES MICRO-CODE LOADED IN KMCll. 



**************** ft ********************* ****************************** 



CLRB RCOLY JINITIALIZE TIE FLAGS 
jINITIAF — " 



CLRB XMOLY ^INITIALIZE THE FLAGS 



CLR XXll ^INITIALIZE THE END PASS FLAG. 

CLR XXfl JINITIALIZK THE END^PASS FLAG. 



TST SRi }IS IT MULTIP 



y OPTION? 



BMI 2$ ;YES,GQ SET UP BFSIZE i NPRRATE. 

177404 BIT |filT14/SRl ;IS THE RATE SET? 

BEQ Ss ?NO#TAKE DEFAULT. 

177616 MOV S|mULV/RS12E ;SET HP8/DR RATE. 

177612 MOV SZMULV,XSIZE ?SET THE NPR/BR RATE. PARAMETER. 

177626 MOV RTMULV/NPRTE ;SET NPR RATE. 

BR 3$ ;SET UP THE REST. 

177350 2$: BIT «BIT14,SR1 ;IS SR1<14>.=1? 

BNE 4S /VESi, PRINT THE ERROR S, DROP THE MODULE. 

MOV SRl^Rl ;RETRIEVE BUFFER SIZE MULTIPLICAND. 

MOV SH1/R2 ;RETRIEVE NPR RATE MULTIPLICAND. 

ASR R2 ;SBT UP NPR RATE MULTIPLICAND 

ASR R2 JSET UP NPR RATE MULTIPLICAND 

ASR R2 JSET UP NPR RATE MULTIPLICAND 

ASR R2 ?SKT UP NPR RATE MULTIPLICAND 

ASR R2 ;SET UP NPR RATE MULTIPLICAND 



ASR R2 JSET UP NPR RATE MULTIPLICAND 

BIC #1777Q0/R1 JCLEAR THE EXTRA BITS. 

BIC §177700, R5 JCLEAH UNNECESSARY BITS. 

MOV Kl,R3 ;GET the MULTIPLICAND... 

MOV SZMULV,R4 JGET THE MULTIPLIER... 

JSR R5,MLTPLY JMULTIPLY & RETURN THE RESULT 



177542 CMP #377, TEMP jCHECK IF WITHIN LIMIT. 

BLE 12$ ;ND take THE DEFAULT.. . 

177534 177504 MUV TEMP,RSIZE >RSIZE=HPR/BR RATE. 

177526 177500 MOV TEMP^XSIZE ;XSIZE=NPR/RR RATE. 

12$: MOV R2,R3 >GhT THE MULTIPLICAND... 

177510 MOV RTMULV,R4 JGET THE MULTIPLIER... 

003430 JSR R5,MLTPLY JMULTIPLY I PUT RESULT IN TEMP. 

010000 177504 CMP #10000, TEMP JCHECK IF WITHIN LIMIT... 

BLE 3S JND,TAKS THE DEFAULT... 

016767 177476 177472 HOV TEMP^NPRTE JNPRTE=MPP/TIME. 

032767 010000 177216 3$: BIT #BIT12,SR1 ;IS IT RECEIVE ONLY? 
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000600' 
000602' 
000610* 
0Q0612- 
000612' 
000620' 
000622' 

nm- 

000636 • 
000640* 
000644' 
000650" 
000654' 
000660' 
000662' 
000664' 
000666' 
000672* 
000674" 
000700' 
000704' 
000710' 
000714' 
000716' 
000724' 
000730' 
000736* 
000740' 



000744' 
000750' 
000754' 
000760' 
000766' 
000774' 
001002' 
001010' 
001016' 
001024' 
001032' 
001040' 
001Q44' 
001046' 

mm- 



001413 
032767 
001404 

104403 
000636 
105167 
000406 
032767 
001402 
105167 

mm 

005067 
006203 
103404 
001427 
062701 
000770 
004767 

Q05767 
001764 
104403 
005267 

imn 

000167 



016702 
012703 
016767 

012767 
012767 

i\m 

012767 
016700 
006200 
103410 
001446 
062701 
062702 
062703 



020000 177206 

000000' 002016' 
177434 

020000 177160 
177417 

177406 



000000' 002022' 
177336 

000003 177330 
177352 



lOS: 
9$: 



BEQ 
PIT 
BEQ 

MSGHS 
BR 

COMB 

BR 

BIT 

BEQ 

COMB 

MOV 

MOV 

CLR 

ASR 

BCS 

BEQ 

ADD 

BR 

JSR 

JSR 

JSR 

TST 

BEQ 

MSGN$ 

INC 

CMP 

BGT 

JMP 



BIT13,SR1 

$ 

,BEGIN/S0FT1 

DROP 

RCOLY 

7S 

|BIT13,SR1 
XMOLY 

ADDR.Rl JGET 

SELECT, R3 

TEMP 

R3 

9S 

SETUPl 

^oM 

PCWCRAM 

PCWMEMRY 

PC^VERIFY 

MASK 

10$ 

'BEGIN, S0FT2 
TEMP 
|3,TEMP 

dIop 



NC , CHECK IF XMITR ONLY. 
IS XMITR ONLY JLSO SET? 
NC, SETUP FOR RECEIVE ONLY 

ASCII MESSAGE CALL WITH COMMON HEADER 

DROP THE MODULE. 

SET RECEIVE ONLY FLAG. 

GO SET UP OTHER VARIABLES. 

IS XMITR ONLY SET? 

NO, DO BOTH. 

SET XMITR ONLY FLAG. 

FIRST DEVICE CSR. 

GET THE DEVICE SELECTED. 

CLEAR THE RETRY COUNT. 

ANY DEVICE REMAINS. 

YES, GO AND LOAD MICRO-CODE INTO IT. 

SETUP THE REST. 

UPDATE THE CSR. 

LOAD THE NEXT DEVICE. 

«RITE THE CRAM WITH MICRO-CODF. 

AND LOAD LOSER HALF OF MAIN MEMORY WITH XMITR PUFKCH. 
VERIFY MICRO-CODE S XMTTR DATA. 
IS THERE ANY ERROR. 
NO, GO INITIATE IT. 

ASCII MESSAGE CALL ^ITH COMMOK HEADER 
INCREMENT RETRY CCUNT. 
IS IT TRIED THREE TIMES? 
NO, TRY AGAIN!! 
DROP THE MODULE. 



< ************************** ***************************** 

THIS PART SETSUP THE PROGRAM CONTROL 
VARIABLES FOR THE DEVICES AND THE 
MODULE. EX. QUEUES.. ..,ETC. 

************************ ************ ******************* 



177036 




kTUPl: 


MOV 


177034 






MOV 


004222' 






MOV 


177246 


003246 




MOV 


177240 


003262 




MOV 


007276' 
007276' 


006354 




MOV 


006350 




MOV 


007316' 
007316' 
007336' 


006346 




MOV 


006336 




MOV 


006334 




MOV 


007336' 


006330 




MOV 


177164 






MOV 






2$: 


ASR 






BCS 
BEQ 


000010 




3$: 


ADD 


000010 




ADD 


000022 






ADD 



ADDR,R1 
VECTOR, R2 
#TNTLNK,R3 
FLAGB,XX11 
FLAGB,XX21 
#PIRINQ,INQIN 
#PIRINQ,INQOUT 
}^PIROUTQ,DUTQOUT 

!P1ROUTQ,OUTQIN 
REGQ,REGQI 
REGQ,REGQO 
ELECT, RO 
RO 
4$ 

SETUP2 

tflO,Rl JKO.UPDA 
#10, R2 JUPDATE 
122, R3 JUPDATE 



JGET THE DEVICE CSR. 
JGET THE VECTOR. 

JGET THE POINTER TO INTERRUPT LINKAGE. 
JSET THE END PASS FLAG FOR DEV«1. 
JSET THE END PASS FLAG FOR DEVp. 
JSET UP ALL QUEUES S ITS POINTERS. 
JSET UP ALL QUEUES & ITS POINTERS. 
JSET UP ALL QUEUES S. ITS POINTERS. 
SET UP ALL QUEUES & ITS POINTERS. 
,SET UP ALL QUEUES & ITS POINTERS. 
JSET UP ALL QUEUES & ITS POINTERS. 
JR0= DEVICES SELECTED. 
JANY DEVICE ACTIVE? 
JYES, GO SET IT UP. 
JALL DONE? 
TE CSR. 
VECTOR 
LINK. 
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057 
-01735 
012763 

mi 
mm 
mm 

000772 

mm 

°05 li 

Mn 
mm 

* 1711 



052761 
105767 
001403 



000004 
000006 



000010 
177016 
040000 

mm 

000006 
100000 



4$J 



5$: 

SETUP2; 
1$: 

2$: 
3$: 



000002 12$: 



6$: 



BR 

MOV 

MOVE 

MOV 

MOV 

ADD 

MOVE 

CLR 

CLR 

TSTB 

BBQ 

MOV 

BR 

TSTB 

BEQ 

MOV 

MOV 

MOV 

ASR 

BCS 

BEQ 

ADD 

BR 

TST 

BME 

MOV 

CLR 

CLR 

CLR 

CLR 

MOV 

TSTB 

BMI 

MOV 

MOV 

BREAKS 

BREAK 

MOV 

MOV 

BR 

BIS 

TSTB 

BEQ 

BIS 

BR 

BIS 

BR 




BIT14,(Rl) 
Rl* 

4{R1 
6{R1^ 
»BITl5,(Rl) 
(Rl) 
12$ 

RO,SAR0 
Rl/SARl 

/BEGIN 
/BEGIN 

SARO,RO 
SARl/Rl 



}G0 SET UP FOR NEXT DEVICE, 
;LDAD INTERRUPT VECTOR ADDRESS. 
ISET THE PRIORITY. 
;SET THE DEVICE CSR. 
?LOAD XMITR 
; INTERRUPT VECTOR. 
JSET THE PRIORITY. 
;CLEAR END PASS FLAG FOR DEV«1. 
;CLEAR THE RECEIVE BUFFER OFFSET. 
MS XMITR ONLY FLAG SET? 
; NO/CHECK FOR RECEIVE ONLY FLAG. 
12(R3) /SET XMITR BITS IN ENDPASS FLAG. 

lis RECEIVE ONLY FLAG SET? 
;N0, DON'T SET ANY BITS IN ENDPASS FLAG. 
12{R3) ;SET RECEIVE BITS IN ENDPASS FLAG. 
;R1=CSR ADDRESS. 

5ro=select. 

;any device active? 

;YES/G0 & INITIATE THE DEVICE DEC/X MODULE. 
;ALL DOME/ GO AND SCAN. 
JUPDATE CSR ADDRESS. 
;CONTINUE. 

;IS IT FIRST PASS??? 
JNO/THEN DON'T INITIALIZE DEVICE 
;MASTEP CLEAR FIRST TIME ONLY. 
INITIALIZE THE UNI0US CSR'" 



?INITIA „ 

;INITILIZE THE UNIRUS CSR'S. 
^INITIALIZE THE UNIBUS CSR'S. 
INITIALIZE THE UNIBUS CSR'S. 

JSET THE RUN BIT... 
; IS RD I SET? 
;YES, THEN START DECX. .. 
?SAVE REGISTER RO... 
;SAVE REGISTER Rl... 
JTEMPORARY RETURN TO MONITOR.... 
?THEN CONTINUE AT NEXT INSTRUCTION. 
?RESTaRF, REGISTER RO... 
;RESTOREHEGISTER Rl... 
; WAIT/FDR RD I TO SET... 
;SET lEO... 
MS RECEIVE ONLY SET? 
;ONLY BRANCH IF NO. 
;SET I EI/ RECEIVE PA/CC I 
;CGNTINUE. 

;SET lEI/ XMITR BA/CC T. 
;CONTINaE. 



********************************** ft** 
« 

* THIS ROUTINE SCANS ALL DEVICES END PASS FLAGS 

* UNTIL ALL ACTIVE KMCll DEVICES ARE FINISHED. 

* UPDATES PASS COUNT AND LOOPS TILL 200 PASSES 

* ARE DONE. CHECKS DATA AND PRINTS OUT DATA ERRORS. 

* REPORTS END OF PASS. 
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22 176546 



76350 
76346 
76344 
76342 
76340 

000000' 



******************* 



000003 
000010 
176652 
176652 


176674 
176654 

002652 


IcAN 

1$: 


000001 
176634 


176644 

002656 


2S: 


000002 
176622 


176626 


3$: 


004232' 




4S: 


000022 




5$: 


000000' 


176604 


6$: 


176632 




7$: 



MOV 

MOV 

CLR 

CMP 

BNE 

BIG 

CMP 

BNE 

BIG 

TST 

BNE 

MOV 

MOV 

MOV 

ASR 

BCS 

BEQ 

ADD 

TST 

BR 

MOV 

MOV 

ENDITS 
JMP 



p/MASK 

FLAGB/XXll 

iilTO/MASK 
FLAGB/XX21 

illTl/MASK 

MASK 

16$ 

#INTLNK+10/R1 

SELECT/RO 
|BUFTAB,R3 




?SET BIT FOR ALL DEVICES. 

;SET DELAY COUNT. 

;CLEflR DELAY COUNT 

;IS DEVICE 1 ALL DONE?. 

JNO/CHECK THE NEXT ONE. 

;CLEAR THE DEVICE BIT. 

MS DEVICE n ALL DONE? 

;NO/GO AND WAIT. 

/CLEAR THE DEVICE BIT. 

;ARE ALL DEVICES DONE? 

JNO/GO AND WAIT. 

;R1 POINTS TO DEVICE CSR. 

;R0 CONTAINS BITS FOR ACTIVE DEVICES. 

;R3=P0INTER TO RECEIVER BUFFER. 

MS ANY DEVICE ACTIVE? 

;YES/Ga AND CHECK THE DATA. 

MS IT ALL DONE THEN BRANCH. 

JOPDATE Rl TO NEXT DEVICE CSR. 

JUPDATE R3 TC NEXT BUFFER. 

;CONTINUE. 

;SET FIRST PASS FLAG. 
;SET FLAG FOR MICRO-CODE LOADED. 
JSIGHAL END OF ITERATION. 
;MONITOR SHALL TEST END OF PASS 
?LOOP THE MODULE. 



*************************************************************** 
* 

* CHECK THE DATA IN RECEIVE BUFFER.. . 

*************************************************************** 



&$: 
9$: 
lOS: 



11$: 
16$: 



TSTB 
BNE 
MOV 
MOV 
MOV 
MOV 
CMPB 
BEQ 
MOV 
MOV 
MOV 
MOVB 
MOVB 

• ******* 



|MOLY 

fl3)/R2 
(R2)+/R4 
iXBUF/R5 
RSIZE/TEMP 
|R|)/tR4) 

(R1)/CSRA 
R5,SBADR 
R4/HASADR 
(R5)/ASB 



*********** 



6aTERS/BEGIN 
• *************** 



ms it xmit only??? 

;yes/ then dont check the data. 

;r2=p0ints to receiver buffer. 

;r4=p0ints to receiver data. 

;r5=p0ints to good data. 

;set the buffer size. 

;compare data. 

;gooD/COMPAre next char. 

;load csra. 

jload good address. 

;load bad address. 

;L0AD good DATA. 
;L0AD BAD DATA. 

k ******* ******* 



**************************** 



************** 



CMPB 
DEC 
BNE 

BR 



10$ 

5$ 



;P0P BUFFER DATA POINTERS. 

;ALL DONE? 

;N0, 00 THE NEXT. 

;G0/ AND CHECK REMAINING DEVICE. 
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m 



532 
533 



001666' 
001670 
001674' 
001702' 
001710' 
001712 



001730' 
001736' 
001744' 
001752' 
001756' 
001764' 



104407 

104407 

005367 
001402 
000167 
005367 
001402 
000167 
016700 
040067 
006000 
103004 
004367^ 

Soooo! 

006000 
103004 
004367, 

?8o?02 
000167 



0X2367 
052767 
104403 
011201 
010167 
011167 
016167 
016167 
016167 
016267 
011267 
016267 
012767 



000000' 
000000' 



177544 
176410 

177532 
176410 
176376 



000010 
176440 



000110 
000060 
000000' 

176162 
176160 
000002 
000004 
000006 
000002 

oE??io 

000011 



17$: 



18$: 



BREAK* 


/BEGIN 


JTEMPORARY RETURN TO MONITOR..., 
;THEN CONTINUE AT NEXT INSTRUCTION. 
; THEN CONTINUE AT NEXT INSTRUCTION . 


BREAK* 


/BEGIN 






DEC 


DLY2 


/DECREMENT DELAY COUNT FOR #2. 


BEQ 


. + 6 

il,.. 


IhAIT FOR DEVICE TO COMPLETE. 


JMP 


DEC 


DLYl 


;DECREMENT DELAY COUNT FOR Hi. 


BEQ 


.+6 

mIsk.ro 
ro/select 






• w/iTT FfiD ncuipc Tn t-nuotsw 

/HAII rUK UC<vJ.Ui:j lU v-UMIr Li& I n . 


MOV 


;R0=HUNG DEVICE BITS. 


BIC 


;DROP ANY HUNG DEVICE. 


ROR 


RO 


;WAS DEVll HUNG?. 


BCC 


17$ 


;BRANCH IF NO. 

JTYPE ERROR MESSAGE & DROP. 


JSR 


R3/XERR 


CSHGl 




;P01NTER TO 0EV#1 CSR. 


1 




;DEVICE NUMBER FOR TYPEOUT. 


ROR 


RO 


;WAS DEV|2 HUNG? 
JBRANCH IF NOT. 

;TYPE ERROR f-ESSAGE THEN DROP. 
/POINTER TO DEV#2 CSR. 


BCC 


18$ 


JSR 


R3/XERR 


CSR22 




2 




;DEVICE NUMBER FOR TYPEOUT. 


JMP 


LOOP 


;RESTART MODULE. 



it*1iikit ********** itlfk-k*** 



********* 



THIS SUBROUTINE DROPS THE HUNG DEVICE. 
CLEARS OUT DEVICE SELECT BITS. 
PRINTS THE EXTENDED ERROR >'ESSAGE. 



Ic********** 



********** 



************ 



^ERR: 



000102 
002006' 



176154 
176266 
176262 
000274 

000266 
176114 



MOV CR3)+/R2 
MOV <R3)+/DEV 
BIS 160/DEV 
MSGN$/BE(5lN^DR0Pl 
MOV '"'^ 
MOV 
MOV 
MOV 

4{R 
6{R. 
2(R2 



002000' 
002002' 
002004' 
002006' 
002010' 
002012' 
002014' 



005011 

000203 

000000 

002026' 

002004' 

002050' 

177777 



..-.N,_. _ 
(R2)/P1 
R1,CSRA 
(Rl- - 
2(R 



ACSR 
/ASTAT 
/DLYl 
/DLV2 
/ESAVl 
ESAV2 



(R2)/ESAV2 
i0(R2)/ESAV3 
#11,ERRTYP 



001772' 104405 000000' 002256' 



DEV: 
DROPl: 



MOV 
MOV 
MOV 
MOV 

MOV 

MOV . 

•***********************% 

HRDER$, BEGIN, ETABLE 

6lR (Rl) 
RTS R3 
.WORD 
XDROPl 
DEV 

X0R0P2 
-1 



;GET POINTER TO CSR. 
;GET DEVICE H. 
?MflKE IT ASCII. 

JASCII MESSAGE CALL WITH COMMON HEADER 
;GFT CSR ADDRESS. 
;SAVE CSR 

;SAVE CONTENTS OF SELO. 
;SAVE CONTENTS OF SEL2. 
;SAVE CONTENTS OF SEL4. 
JSAVE CONTENTS OF SEL6. 
;SAVE END PASS FLAG. 
;SAVE RECEIVE BUFFER OFFSET. 
;SAVE RECV/XMTTR COUNTERS. 
RUPT 

' - ■ ■ - ■ ■ ■'■■■,**f[*******t,***iiK 



}Smn OFF HUNG KMCll. 
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002016- 
002020' 
002022' 
002024' 



002110' 
177777 
002171' 

mm 




nnii 

002246' 
002250' 
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SOFTl: SOFTll 
-1 

S0FT2: S0FT21 

ERROR MESSAGES 

XDROPl: .ASCIZ /% KMCll DEVICE / 

XDRaP2: .ASCIZ /IS HUNG AND HAS BEEN DROPPED. .%/ 



SOFTll: .ASCIZ /% ERROR IN SETTING UP SWITCH REGISTER % RESTART / 



S0FT21: .ASCIZ /% ERROR IN LOADING MICRO-CODE WILL RETRY. ..%/ 



.EVEN 

EXTENDED ERROR PRINTOUT LOCATIONS,... 

.SfiORD 
.WORD 
.WORD 
.WORD 

TABLE OF ADDRESSES FOR EXTERNAL ERROR PRINT OUTS. 

DLYl 

DLY2 

ESAVl 

ESAV2 

ESAV3 

-1 

ESAVl 
ESAV2 



isAVi: 

ESAV2: 
ESAV3: 
ESAV4: 



If able: 
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ESAVJ 
ESAV4 
-1 



******«!********** *************************** 
* 

* INPUT INTERRUPT SERVICE ROUTINE 

* THIS ROUTINE SERVES THE IN INTERRUPT 

* FROM KMCll BY LOADING REQUESTED XMITR 

* OR RECEIVE BA/CC I 
************************** 



R5,@INQIN ;SAVE LINK POINTER IN QUEUE. 

#2,INQIN ;UPDATE THE QUEUE POINTER. 

|pIRINQ+20/lNQIN ;END OF QUEUE? 



Inisr: 
1$: 

3$: 



002544 
002550 
002554 



142711 
104400 
002560' 



oocooo- 

004266' 
001436 
175526 
175522 
'75506 
00001 

000200 
000000' 



175534 XMITH: 

000004 
000006 
000006 
000006 

1$: 

ILINT: 



MOV 
ADD 
CMP 
BGT 
HOV 
MOV 



ttPlRINQflNQIN 
(SP)+,R5 



;NC, PROCEED. 

;RESET QUEUE POINTER. 
;REST0RE R5,I.R pop THE 



^IRQS 

Sov 

ADD 

CMP 

3GT 

MOV 

MOV 

BIT 

BEQ 

BIT 

BNE 

MSGNS 

EXITS 

MOV 

MOV 

JSR 

MOV 

NOV 

BIS 

BIS 

fllCB 

F.X1T$ 

MOV 

JSR 

MOV 

MOV 

BIS 

BIS 

BICB 

EXITS 

MES2 



,BEGIN/-2$ 



QUEUE UP TO CONTINUE AT 2$ AND RTT 



INQ0UT,R5 ; RESTORE THE LINK POINTER. 

2,INQ0UT JUPDATE THE QUEUE POINTER. 

pirinq+20,inqdut ;end of queue? 

;no^continuk. 

;RESET THE QUEUE POINTER. 
;LOAD CSR ADDRESS. 
;RECEIVE BA/CCI.? 
;BRANCH IF YES. 

;xhitr ba/cc i? 
;branch if yes. 

;asci1 message call with common header 

jexit to monitor. modulf wait for interrupt. 
;get receive buffer pointer. 
;va=receive buffer virtual address.. 
;get physical address. 
/sel4=physical rbuff. 
;sel6=extended bits of address. 

;L0AD RECEIVE CHARACTER COUNT. 
;S£T BITl IN END PASS FLAG FOR 
;REC BA/CC I LOADED. 

;CLEAR WJ TO REQUEST SERVICE FROM 
/KMCll. CLEAR lEI... 

;EXIT TO MONITOR. MODULF WAIT FOR INTERRUPT. 

;ldad xeuFFEP virtual address. 
;get extended physical address. 

?LOAD physical XMITR BUFFER. 
;LOAD EXTENDED ADDRESS BITS X?^ITR BUFFER. 
;L0AD XMITR CHARACTER COUNT. 
;SET RTTO IN END PASS FLAG FOR 
?XMITR RA/CC I LOADED. 
#BIT7/(R1) ;CLEAR RD I TO INDICATE START CF OPERATION 

/BEGIN ;EXIT TO MONITOR. MODULE «AIT FOP INTERRUPT. 



#PIRINQ,TNQOUT 

, BEGIN/ ILINT 
, BEGIN 

PC/EABITS 

PA,4(Rn 

EA,6(R1) 

RSlZE/6fRl) 

#BIT1/6(R5) 

#BIT7!RIT4/(Rl) 

/BEGIN 

#XBUf/VA 
PC,EABITS 
PA,4(R1^ 
EAe6(Rl, 
XSIZE,6(H1 
#BTT0,6(R5 
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177777 
044445 
044440 
05252' 
05211_ 
051040 
052123 
052440 
000045 



050116 
052116 



052125 
051105 
053440 
047516 
042525 
052105 
020441 



MES2: 




175060 
175054 
175050 



003044' 142761 000352 000002 
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.ASCIZ /?INPUT INTERRUPT HITH NO REQUEST SET UP!!!?./ 



.EVEN 



****** *** 



OUTPUT INTERRUPT SERVICE ROUTINE 
THIS ROUTINE SERVES THE OUT INTERRUPT 
FROM KMCll BY 1 REPORTING ERROR. 

2 ACCEPTING RECEIVE OR XMITR DONE 



******************! 



*************************** 



6uiSR: 



MOV 
ADD 
CMP 
BGT 
MOV 
MOV 



R5/ggUTQIN 



;SAVE LINK POINTER IN QUEUE. 

2#DUTQIN ;UPDATE THE QUEUE POINTER. 

PIROUTQ+20/OUTQIN ;1S IT END OF QUEUE? 



15 JNG, CONTINUE. 

SPIROUTQ/OUTQIN ;RESET THE QUEUE POINTER 
' -POP THE STACK POINTER 



<SP)-»-/R5 

^liiiTBiGiN^is 



QUEUE UP TO CONTINUE AT 2$ AND RTI 



MOV 

ADD 

CMP 

BGT 

MOV 

MOV 

BIT 

BEQ 

BIT 

BEQ 

MSGNS 

BIT 

BEQ 

MSGNS 

BIT 

BEQ 

MSGNS 

MOV 

MOV 

MOV 

MOV 



!QUTQ0UT,R5 ;RESTaRE THE LINK POINTER FROM QUEUE. 

2/OUTQOUT ;UPDATE THE QUEUE POINTER. 

PlROUTQ+20/OUTQOUT ;IS IT END OF QUEUE? 
S /NO, CONTINUE. 

PIROUTQ/OOTQOUT JRESET THE QUEUE POINTER. 
R5),R1 ;L0AD CSR ADDRESS. 

Blfl/2(R1) ;IS CONTROL/O ERROR REPORT? 

§ ;N0/ then CHECK FOR RCV OR XMITR. 

;IS IT SOFT ERROR... 
;N0/THEN CHECK REMAINING... 
;ASCH MESSAGE CALL WITH COMHOK HEADER 
JIS IT DATA ERROR... 
;NOirCHECK THE REMAINING... 
;ASCII MESSAGE CALL WITH COMMON HEADER 
;IS IT NQN EX HEHOFY ERROR. 
;N0 THEN MUST BE DATA ERROR. 
JASCII MESSAGE CALL WITH COMMON HEADER 
;LOAD DEVICE CSR ADDRESS. 
;L0AD CONTENTS OF DEVICE CSR. 
LOAD ERROR BITS. 



BIT3/2(R1) 

, BEGIN. SFTl 
tfBIT6/2(Rl) 
12S 

/BEGIN, DTEHl 
|BIT5,2(R1) 

/BEgIn/NXMMRY 
Rl/CSRA 
4(R1)/ACSR 



fiRDERS 



e^Rlj^ASTAT 



»352/2(Rl) 



******jE** ********************** ****** 
;A CNTL/O RECEIVED 

**************************************** 
;ASTAT= ERROR BITS. 

;CLEAR RDO/NON EX MEM. /CNTL/O. 
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EX1T$/BRGIN 



|BIT2,2(R1) 




;EXIT TO MONITOR. MODULE «A1T FOH INTERRUPT. 



;is IT 



_ XHITR DONE? 
,NG/RECEIVE!SERVE IT 



;SET XMITR DONE BIT IN RfID PASS FLAG. 
;IS IT XMIT ONLY??? 

JCCNTINUE 

;SET FOR RECEIVE BA/CC I... 
;CO[ITINUE. 

;SET RECEIVE DONE BIT IN ENDPASS FLAG. 
?ALL DONE? 
;N0#CONTINUE. 
; CLEAR lEO. 
JCLEAf? THE lEl. 
0,2{P1) ;CLRAR RDO/XMITR OR RECV DONE/ BA/CC 0. 

;EX1T TO MONITOR- MODULE WAIT FOR INTER 



./% NOW EXISTENT MEMORY ADDRESS ERROR 1/ 



ASCIZ / DCCURED MHILE DOING NPR'S %/ 



.ASCIZ /% SOFT ERROR %/ 
.ASCIZ /% DATA ERROR ON TRANSMIT %/ 



******************************* 



* SUBROUTINE TO LOAD MICRO-CODE INTO CRAM. 

* A^O THE PARAMETERS INTO SCRATCH PAD. 
Rl CONTAINS THE CSR AT THE TIME OF ENTRY. 

* 

********************* *ik*****«* ********** 



003356' 005000 



;RO=PaiNTS TC CRAM ADDRESS. 
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794 
795 



012702 
005011 
01006| 



007372' 

000004 
000006 
002000 
022000 

002000 

000000 




000000' 003506' 



051103 
042504 



1$: 



3$: 



4$: 



5$: 
2$: 



CRHOFW: 
MES3: 



#KMAAMC,R2 

Roil(Rl) 
(R2)+,6(R1) 
#BITl6#(Rl) 
|bIT13!BIT10/ 

|2000rP0 

|I/(R2) 

*Rc6lV/R2 
Rl) 

R3,R0^CLK 

R5 

|15,R5 



MOV 

CLR 

MOV 

MOV 

MOV 

MOV 

IMC 

CMP 

BLT 

CMP 

BNE 

MOV 

MOV 

CLR 

BIC 

BIS 

MOVB 

JSR 

123100 

INC 

CMP 

BGT 

CLR 

RTS 



MSGNS, BEGIN, CRMOFW 
8R 5$ 



;R2 POINTS TO MICRO-CODE. 
JCLEAR SELO... 
;LOAD THE CRAM ADDRESS... 
;LCAD WORD TC BE WRITTEN... 
;SET ROMD 
(Rl) /WRITE IT! 

;INCREMENT CRSM ADDRESS. 
;OVER FLOW? 

;YES, REPORT AND RETURN. 
;IS IT END OF KICRO-CODS? 
;N0/CONTINUE LOADING. 
;R6=THE SCRATCH PAD ADDRESS 
;SET THE PARAMETER POINTER. 
JCLEAR SELO. 

JCLEAR THE ADDRESS IN INSTRUCTION.. 

JSET SCRATCH PAD ADDRESS 

;LOAD SEL4 WITH DATA. 

;CLOCK THE INSTRUCTION IN 

; THIS LOCATION. 

;INCREMSNT SCRATCH PAD ADDRESS. 

;IS IT DONE? 

;BRANCH IF NOT DONE. 

;CLEAR SELO. 

; RETURN 

;ASCII MESSAGE CALL WITH COMfJJON HEADER 
; RETURN. 



MES3 
-1 

.ASCIZ 



/% MICRO-CODE OVER FLOWS CRAM 1/ 



020123 
022440 



**************************************************************** 
* 

* THIS ROUTINE WRITES GOOD DATA BUFFER 

* INTO LOWER HALF OF THE MAIN MEMORY... 

* Rl CONTAINS THE DEVICE CSR ADDRESS. 
* 

***************************************** 



1$: 



JSR 

010000 
JSR 

004002 

MOV 

MOV 

CLR 

MOVB 

JSR 



R3,R0MCLK /CLOCK INSTRUCTION. 

;LOAD MAR<0:7>. 
R3,R0MCLK /CLOCK INSTRUCTION. 

/SET POINTER IN KMCll MEMORY. 
ftXBUF^RO 



(R0)+,4(R1) 
R3,R0MCLK 



SET POINTER TO DATA, 
SET THE COUNT. 



BSEL4<— GOOD DATA. 
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000004 
002000 



174350 



000000 
002000 

000011 
000262' 

000077 
QQOQIO 
000004 
000162 

0001S4 

000004 

174250 

000015 



001000 
174224 



136500 

DEC 

BNE 

CLR 

RTS 



************* 



}IQAD NEMORY AND INCREMENT ADDRESS, 
;COUNT BY ONE. 
;BfiANCH IF NOT DONE.. 
JCLEAR THE CSR. 
^RETURN to MAINLAND. 

************************** 



VERIFY THE MICRO-CODE 

THIS ROUTINE VERIFIES THE MICRO-CODE 

LOADED. AHD CHECKS HPR RATE PARAMETER. 

AND THE MAIN MEMaRV CONTENTS 

Rl CONTAINS THE ADDRESS OF DEVICE CSR. 



*********************** 



OeRIFY: 

is: 

3$: 

5$: 
6$: 



8$: 
9$: 



clr 

MOV 

CLR 

CLR 

MOV 

MOV 

MOV 

MOV 

CMP 

BEQ 

COM 

BR 

TST 

INC 

CMP 

BEQ 

CMP 

BGE 

MOV 
MOV 
CLR 
BIC 
BIS 
CLR 
JSR 

040600 

JSR 

061224 

CMPB 

BEQ 

COM 

BR 

INC 

CMP 

BGT 

MOV 

MOV 

MOV 



MASK 

|KMAAMC,R0 
R5,R4 

mIsk 
|lo) + 

|0,(R0) 
||000,R2 

ni,R5 
PC0LY/R4 

R3,R0MCLK 

R3,R0MCLK 

|R4)+,4(fil) 

MASK 

R5 

|15^R5 

flBUF,R0 

|1000,FLAG 

XSIZE^R2 



i********************** 



ICLEAR THE ERROR FLAG. 

;R0 POINTS TO SOFTWARE MICRO-CODE. 

?R2 CONTAINS CRAM ADDRESS BITS 0-7 

?CLEAR THE MAINTANENCE REGISTER. . 

;SET THE CRAM ADDRESS... 

?SET ROMO. 

>PUT "EXPECTED" IN R5. 

;PUT "FOUND" IN H4. 

KOMPARE 

JBRANCH IF O.K. 

;SET ERROR FLAG. 

} R ETUR N . 

JBUMP MicRO-CDDE POINTER. 

;bump cram address, 
jis it done? 

;yes,go and check the memory... 
;ddne yet??? 

;NO/CaNTINUE 



JR5=SPAD ADDRESS. 

;SET THE PARAMETER ADDRESS. 

?CLEAR SELO. 

;CLEAR THE ADDRESS FIELD... 

;SET SCRATCH PAD ADDRESS IN INSTR. 

;CLEAR SEL4 

;CLOCK THE INSTRUCTION. 
;MOVE SPAD<R5>->PERG. 

JCLOCK THE INSTRUCTION IN NEXT LOCATION. 

;M0VE BREG/0UT1<CSR4>. 

;COMPARE 

;GC0D/ DO THE NEXT. 
JSET ERROR FLAG. 
? RETURN. 

>UPDATE R5 POINTING TO NEXT SPAD. 
MS IT DONE? 
?BKANCH IF HOT DONE. 
;GET THE DATA ADDRESS. 

THE BUFFER 

THE COUNT. 
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000026 
000026 
000012 
000012 
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04060' 
04062^ 

0040^1' 
004074' 

m 

mir- 
'W- 

22' 
24' 



88| 

004 



004144' 
004150' 



-lOOQO 
004367 



005167 
000404 
005267 
005302 
001336 
005011 
000207 

112761 



4160' 



0041,. 
004164' 
004170' 
004174' 
004202' 



104415 
000367 
0Q6167 

000207 



001000 000001 
000006 
001400 
003400 



12$: 



15$: 
18$: 



21$: 
4S: 

ROMCLKl 



BIC 

BIC 

BISB 

BISB 

JSR 

010000 

JSR 

004000 

JSR 

040620 
JSR 

061224 

CMPB 

BEQ 

COM 

BR 

INC 

DEC 

BNE 

CLR 

RTS 

MOVB 

MOV 

BIS 

BIC 

RTS 



K^'G;f5$ 

FLAG+1,1B$ 
R3,R0MCLK 

RS/ROMCLK 

R3/R0MCLK 

R3/R0MCLK 

^R0)+,4CR1) 

maIk 

F^AG 

R2 



;clear the address field. 
;clear the address field, 
jadd address to instruction. 
?add address to instruction. 

;load mar_lo. 

;load mar_ht. 

|bREG<— MEM. 

;BSEL4<— BREG. 
;CQMPARE THE DATA. 
^BRANCH IF GOOD. 
jELSE-fSET THE ERROR FLAG. 

?RETURN 

INCREMENT THE ADDRESS.. . 
JDONE? 

;NO/CHECK THE NEXT. 
;CLEAR SELO. 
JRETURN. 



|BIT9/1(R1) ;SBT ROMI 

(R3i+,6(R1) ;LOAD INSTRUCTION IN SEL6. 

|bIT9!BIT8|:(R1) ?CL0CK INSTRUCTION. 
|BIT10!BIT9!BIT3,|R1^ '^CLEkn ROMO^ROMI,NP STEP 



******************** 



*********************** 



****************** 



SUBROUTINE EABITS:- GETS PHYSICAL 18 BITS ADDRESS FOR 
16 BITS VIRTUAL ADDRESS. 
returns: adress in PA::ADRESS<0:15> 
ea::address<16:17> 



****************************************** 



t******************** 



000000' 000244' 

174064 

174060 

003??t 174046 



GETPAS, BEGIN, VA 

SWAB EA 

ROL EA 

ROL EA 

BIC 13776, EA 

RTS PC 



*************************** 



;GET PHYSICAL ADDRESS FROM 16-PIT 
;BITS<4:5>— >BITS<12:13> 
;N0W BITS<14:13> 
;NOW BITS<15:14> 
KLEAR THE REST.. 
JRETURN... 



******************* 



* MULTIPLIES #'S IN R3 AND R4 AND RETURNS RESULT IN 

* TEMP 

*********************************************************** 



004204' 005067 174056 
004210' 060467 174052 
004214' 005303 



Altply: CLR 
1$: ADD 

DEC 



TEMP 
R4,TEMP 

R3 



;CLEAR THE RESULT.. 
;MULTIPLY BY ONE... 
;COUNT BY ONE... 



I 
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001374 
000205 




983 
98" 
98- 
986 
98" 
98^ 
989 
990 
991 
992 
993 
994 
995 
996 
997 
998 
999 
000 
001 
002 
003 
004 
005 
006 
007 
008 
009 
01- 



176034 
176360 



004266' 
004274' 
004301' 
004306' 
004314' 
004322' 
004327' 
004334' 
004342' 
004350' 
004356' 
004362' 
004370' 
004376' 
004404' 
004412' 
004416' 
Q04424' 
004432' 
004440' 
004446' 
004450' 
004456' 
004464' 



-0527 . 
000000 
000000 



000400 
003406 

013 
010420 
013426 
016434 

041 
023446 
026454 
031462 
034470 
037075 
042103 
045111 
050117 
053125 
055131 
056055 
043105 
046113 
051121 
054123 
055131 
100600 



001402 
004410 
006414 
011422 
014430 
017436 
021442 
024450 
027456 
032464 
036072 
040077 
043105 
046113 
051121 
054127 
056133 

047115 

053125 
030533 
202 
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BNE 15 ;NGT DONE THEN CONTINUE/ 

RTS RS ;return... 

* LINK TABLE TO INTERRUPT SERVICE ROUTINE. 

*«ileit*1c** ************ ^Tk***«ii*1i**1k****1t*1Htti**ft 



002404 

012 
007416 
012424 
015432 

040 
022444 
025452 
030460 
033466 

041101 
044107 
047115 
052123 

057135 
042103 
045111 
050117 

054127 
077535 



Intlkk 



JSR 
JSR 
.WORD 
.WORD 
RBUFl 
. WORD 
.l^ORD 

JSR 
JSR 
.WORD 
.WORD 
RBUF2 
12'. .WORD 
.WORD 



CSR22: 
XX21: 



R5/TNISR 

R5,0UISR 







R5,1NISR 

R5/0UISR 







MSPUT INTERRUPT SERVICE ROUTINE. 

;OUTPUT INTERRUPT SERVICE ROUTINE. 

;CSR ADDRESS FOR DEV#1. 

;END PASS FLAG FOR DEVfll. 

;RECEIVE BUFFER POINTER FOR DEV #1. 

;REC/XMITR COUNTERS. 

;ERROR COUNTS FOR DEV fll . 

;TNPUT INTERRUPT SERVICE ROUTINE. 
JOUTPUT INTERRUPT SERVICE ROUTINE. 
?CSR ADDRESS FOR DEV ti2. 
;END PASS FLAG FOR DEV #2, 
jRfcCEIVE BUFFER POINTER FOR DEV #2. 
;REC/XMITH COUNTERS. 
;ERRQR COUNTS FOR DEV |2. 



******** 



BUFFERS & QUEUES. 

IbUFz .ASCII <000><001><002><003><004><005><006>< 007X0 lOX CI 1X0 12> 

.ASCII <013><014X015><016><017><020><021><022><023><024X025> 

.ASCII <026><02 7X03 OX 03 1X0 32X03 3X0 3 4X03SX0 36X 037X0 40> 

.ASCII "f'^^^fc' ()* + /-. /Ol 23456789 :<- 

. ASCII /=>?(?AECDEFGHIJKLMNOPQRSTUVWX/ 

.ASCII /YZCVJ-^-XABCDEFGHIJKLMNOPQH/ 



.ASCII /SXUVWXYZC 11 /< 177X2 00X20 IX 202 > 



KHCB DEC/Xll SYSTEM EXERCISER MODULE 
XKHCBO.Pll 12-0CT-78 12:02 



MACYll 30A(1052) 12-0CT-78 16: 40 PAGE 22 



018 
019 

w 

024 
025 
026 
027 
028 
029 
030 
031 
032 
033 
034 
035 
036 
037 
038 
039 
040 
041 
042 
043 

III 

047 
048 
049 
050 
051 
052 
053 
054 
055 
056 
057 
058 
059 

m 

'oil 

064 
065 
066 
067 
068 
069 
070 
071 
072 
073 



004467' 
004474' 
004502' 
004510' 
004515' 
004522' 
004530' 
004536' 
004543' 
004550' 
004556' 
004564' 
004571' 
004576' 
004604' 
004612' 
004617' 
004624' 
004632' 
004640' 
004645' 
004652' 
004660' 
004665' 



005266' 
005270' 



005272' 
005272' 



005274- 
005274' 



006276' 
007276' 



007276' 
007316' 
007336' 
007356' 



203 
104610 
107616 
112624 

231 
117636 
122644 
125652 

257 
132664 
135672 
140700 

305 
145712 
150720 

160740 
163746 
166754 
361 
173766 
176774 
000400 

005266' 

005272' 
005274' 



005276' 
006276' 

001000 

001000 



000010 
000010 
000010 
000000 



02604 
05612 

nm 

15632 
20640 
23646 
26654 
30660 
33666 
36674 
41702 
43706 
46714 
51722 
54730 
56734 
61742 
64750 
67756 
71762 
74770 
77776 



103606 
106614 

116634 
121642 
124650 

256 
131662 
134670 
137676 

304 
144710 
147716 
152724 

332 
157736 
162744 
165752 

360 
172764 
175772 

377 



6bufi: 

RBUF2: 
J : * 

6bUF11: 



6bUF21: 
BASEl: 



.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 

.ASCII 
.BLKB 



RBUFl 
RBUF2 



<203X204><205X20 
<216X217><220X22 
<231X232X233X23 
<244X245X246><24 
<257><260X261><26 
<272><273><274><27 
<305X306><307X31 
<320X321X322X32 
<333><334X335X33 
<346X347><350X35 
<361><362X363><36 



6X2 07X21 0X2 11X21 2X2 13X21 4X2 15> 
1X222X223X224X 225X2 26X227X230> 
4><2 35X236><237X240><241X242X243> 
7X250X25 1><252X253X254><255X256> 
2><263><264X265><266X267X270X271> 
5X276X277X3 00X30 1X3 02X3 3X3 04> 
0X3 11X312X3 13X314X3 15X31 6X3 17> 
3 ><3 2 4X325X3 2 6X327X33 OX 33 1X3 3 2> 
6X337X340X3 41X342X343X344X3 45> 
lX352><35a><354X355X356><3^7X3 60> 
4X3 65X366X367X37 0X37 IX 372X3 73> 
7><377> 



;BUFFER POINTER FOR DEV #1 . 
;BUFFER POINTER FOR DEV |7 . 



TABLE OF RECEIVE BUFFERS 
RBUFll 



;RECEIVE BUFFERS FOR DEV #1. 
;RECETVE BUFFERS FOR DEV #2. 



RBUF21 

RECEIVE BUFFERS FOR DEVICE #1. 

.BLKB 1000 ?RECE1VE BUFFER 11. 

RECEIVE BUFFERS FOR DEVICE l}2. 

.BLKB 1000 ;RECErVE BUFFER 21. 



QUEUES AND ITS POINTERS, 



^irinq: .blkw 

PIROUTQ " 



regq: 
inqin: 



BLKW 

blkw 

WORD 



10 
10 
10 




JINPUT INTERRUPT QUEUE. 
;DUTPUT INTERRUPT QUEUE. 



JINPUT QUEUE POINTER. 
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4 007360- 000000 

5 007362' 000000 

6 007364' OOOQOO 

7 007366' 000000 

8 007370' 000000 



089 
090 
091 
092 
093 

098 
099 
100 
101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
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inqout: .yORD 
outqin: .word 
outqout: .word 

REGQl: .WORD 
REGQO: .MORD 
MICRCD: 



007374' 
007376' 



007430' 
007432' 



; input queue pointer. 
;autput queue pointer. 
;dutput queue pointer, 
jregister queues. 

^REGISTER QUEUES. 

ts*i*ik* ******** ************* frit* 



DEC/Xll MICRO-CODE FOR KMCll IT WORKS AS FOLLOWS: 

1) INTERRUPT 11 PROGRAM WHEN 

A, lEI S. RDI SET - INTERRUPT AT LOG. XXO FDR REQUEST OF 
RECEIVE OR XMIT BA/CC I. 

B. lEO Si RDO set - INTERRUPT AT LQC. XX4 FOR REPORTING 
ERRORS (BY CNTL/O) OR REPORTING THE JOB DONE. 

2) WHEN RDI CLEARED BY THE 11 PROGRAN IT GOES AND 
SERVES THE REQUEST I.E. EITHER RECEIVE OR XMIT. 

A. RECEIVE OPERATION IS TO RECEIVE A BUFFER FROM 
KMCll TO PDPll. 

B. TRANSMIT OPERATION IS TO TRANSMIT A BUFFER FROM 
PDPll TO KMCll. 

3) IN NORMAL CASE (BOTH RECEIVE & XMIT) XMIT HAS TO BE DONE 
FIRST THEN RECEIVE. 

4) IT CONTROLS NPR RATE BY INTERNAL SOFTWARE CLOCK S NFR/BR 
RATE IS CONTROLLED BY CHARACTER COUNT. 

5) IN CASE OF XMIT OPERATION DATA CHECKING IS DONE 
INSIDE KMCll. 



********************** 



************** 



r ****** * 



*********** 



MOVE 


tt 0#BREG 






; CLEAR B R 


MOVE 


1 Q#MLR 




/MAR <0:7>:= 


0. 


MOVE 


f oSmpr 

BREG/SPAD 




;msr <6 


:0>: = 


0. 


MOVE 


<0> 


;CLEAR 


SPAD 


<0>. 


MOVE 


BSEG^SPAD 


<1> 


; CLEAR 


SPAD 


<1>. 


MOVE 


BREG,SPAD 


<2> 


;CLEAR 


SPAD 


<2>. 


MOVE 


BREG,SPAD 


<3> 


;CLEAR 


SPAD 


<3>. 


MOVE 


BREG^SPAD 


<4> 


;CLEAR 


SPAD 


<4>. 


MOVE 


BREG,SPAD 


<5> 


;CLEAR 


SPAD 


<5>. 


MOVE 


BREG,SFAD 


<6> 


;CLEAR 


SPAD 


<6>. 


MOVE 


BREG,SPAD 


<7> 


;CLEAR 


SPAD 


<7>. 


MOVE 


BREG/SPAD 


<10> 


;CLEAR 


SPAD 


<10>. 


MOVE 


BREG,SPAD 




;CLEAR 


SPAD 


<17>. 


MOVE 


BREG,QUT1 




;CLEAR 


BSELO 




MOVE 


BREG^OUTl 


ill 


JCLEAR 


BSEL2 




MOVE 


BREG,QUT1 


;CLEAR 


BSEL3 




MOVE 


BREG^OUTl 


<4> 


;CLEAR 


aSEL4 




MOVE 


BREG/OUTl 


<5> 


;CLEAR 


BSEL5 




MOVE 


BREG,0UT1 


<6> 


JCLEAR 
jCLEAR 


8SEL6 




MOVE 


BREG/OUTl 


<7> 


flSEL7 




HOVE 


BREG/OUTl 


<10> 








MOVE 


BREG/OUTl 


<11> 








MOVE 


BREG/OUTO 


<0> 








MOVE 


BREG/OUTO 


<1> 








MOVE 


BREG/OUTO 


<2> 









KMCB DEC/Xll SYSTEM EXERCISER MODULE 
XKMCBO.Pll 12-0CT-78 12:02 



HACYll 30A(1052) 12-0CT-78 16:40 PAGE 24 



007524' 
007526' 
007530- 
007530' 
007532' 
007534' 
007536' 

mnr- 

007544- 
007546- 
007550- 
007552- 
007554- 
007556- 
007560- 



176 
177 



007610- 
007612- 
007616- 



1$: 



2$: 



MOVE 

MOVE 

MOVE 

MOVE 

HOVE 

MOVE 

MOVE 

SIMC 

$ADC 

MOVE 

BBl 

$BH 

MOVE 

MOVE 

OR 

MOVE 

BB7 

MOVE 

BB7 

SBR 

BB4 

SBR 

MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
OR 

MOVE 

BB7 

MOVE 

BB7 

SBR 



BREG/OUTO <3> 
BREG/OUTO <4> 
BREG/OUTO <5> 
BREG/OUTO <6> 
BREG/OUTO <7> 
BREG/OUTO <10> 

# O^MEM/MARINC 
SPAD <0> 

SPAD <1> 

SPAD <1>/ BREG 

STRTS 

1$ 

# 200/BREG 

INPl <CSR0>,SPAD 
BREG/SPAD <5>/0UT 
INPl <CSR2>/BREG 
KCDLP 

INPl <CSR0>/BREG 

pIcsbf 

INTRPT 

MCDLP 



;clear memory location & inc mar 

;1nchekent the count 

;add carry in to msb. 

;is it done.... 

?br if done and start. 

;else/ continue 

SET RD I BIT IN B REGISTER. 
<0> JSAVE SELO IN SPAD <0>. 
1 <CSRO> ;SET RD I IN SELO. 

;IS ROD SET??? 

;WAIT TILL IT CLEARS... 

;L0AD BREG ¥ITH SELO. 
IF RD I SET/ GO CHECK lEI. 
IF CLEARED/ PROCESS BUFFERS. 
IF IGI IS ALSO SET THEN GO INTERRUPT 
ELSE yAIT. 



Ire6/ 

BREG/i 
BREG/1 
BREG*i 
# 20D 
INPl 
SPAD 
INPl 

iIpi 
mIdlp 



;set up to clear csrs. 

;CLEAR BSEL4. 

;CLEAR BSEL5. 

;CLEAR BSEL6. 

;CLEAR BSEL7 



REG 

OUTl <CSR4> 
OUTl <CSR5> 
OUTl <CSR6> 

OUTl <CSR7> /v-uc.AK DORb/ 

/BREG JSET BR REQ. WITH VECTR=XXO. 

<CSR11>/SPA0 <0> fGET MICRO MISC. REGISTER. 
<0>/BREG/OUT1 <CSR11> ISET BR REQ. I.E. INTERRUPT AT 

<CSR11>/BREG ;IS BR REQ BIT CLEARED. 

;N0/ yAIT OR SPIN ON IT. 
<CSRO>/BREG ;IS IT SERVED??? 

;ND THEN WAIT... 
;RETURN TO LOOP. 



*********************************************** 



c *************** ft* 



PROCESSES THE BUFFER REQUEST. 

*********** **-*****iic ************ ****************** *********** 



^RCSBF: 


MOVE 




MOVE 




MOVE 




AND 


2$: 


MOVE 


MOVE 




AND 




MOVE 




MOVE 




SIFEQ 




MOVE 




SIFEQ 




MOVE 



INPl <CSR6>/SPAD <15> 
" 77/BREG_ 



;load spad <15> with c.c low byte. 

;load masking bits in b register 

impl <csr7>,spad <16> ;get high byte of character count, 

breg/spad <16>/spad <16> ;load high byte of c.c. in spad <16>. 

i 7, breg jload mask in b reg. 

Jnpi <csro>/SPAd <o> ;get bselo. 

breg/spad <0>/br.sp ;mask out and load in breg & spad. 



n«c.ij/:>rAU 
MEM/SPAD <4> 

# 4/MEM 
EM/SPAD <0> 

# O/MEM 
MEM/SPAD <0> 
SPAD <4>/MEM 



;LOAD EXPECTED IN MEM. 

XMIT >XMIT BA/CC I LOADED!! SERVE IT! 
;L0AD EXPECTED IN MEM. 

RECVE ;RECV BA/CC I LOADDEDI! SERVE IT! 
;RESTORE MEMORY LOCATION 
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mm- 



00763: 
00763^ 
007636 
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240 
241 



007736 
007740 



007752 
007754 



MOVE 

MOVE 
CALL 

$BR 



# lirBREG 
BREG,SPAD <0> 
SFTBPR 



^set the type dp error. 

;none! rIport error I! 
;return to loop. 



**************************** **ft*^»*********ife******«****»* ****** * 
* 

* SERVE THE RECEIVE REQUEST. 

* 1. DATA TRANSMIT FROM KMCll TO PDPll. THROUGH NPR'S. 

* 2. CONTROL NPR/RR & NPR RATE. 

* 3. REPORT DONE OR ERROR A, NON EX MEM. 

* B. SOFT ERROR. 



.**************«***»***************************** 



************ 



Iecves 



1$: 



rIvlp: 



2$: 



MOVE 
MOVE 

M§VE 
BZ 

MOVE 

MOVE 

CALL 

SBR 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

AND 

SHFBRT 

SHFBRT 

SHFBRT 

SHFBRT 

MOVE 

MOVE 

MOVE 

AMD 

HOVE 

MOVE 

MOVE 

BZ 

MOVE 

$BR 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

OR 

MOVE 

BBO 

$BH 

MOVE 

BBO 



SPAD <4>#MEM 
SPAD <10>^BREG 

sIao <11>,BREG 

l^lxBREG 
BREG/SPAD <0> 
SFTERR 
STRTS 



^RESTORE MEMORY LOCATION. 

;IS XMIT FLAG SET? 

>YES/ THEN SERVE THE REQUEST. 

;IS RECEIVE ONLY FLAG SET? 

;YES/ THEN PROCEED TO SERVE THE REQUEST. 

?SET THE TYPE OF ERROR... 



INPl <CSR4>,DUT0 <6> 

INPl — 



;N0£ REPORT ERRORH RECV. 
JWAIT FOR NEXT REQUEST. 



BEFORF XMIT. 



JLOAD DUTBA <0;7> 
;LOAD PARALLEL COUNT.. 
;LOAD OUTBA <8;15>. 
JSET PARALLEL COUNT. 
)GET GET OUTBA EXTENDED BITS. 
;GET THE MASK... 



<CSR4>,SPAD <6> 

INPl <CSRS>^OUTO <2> 
INPl <CSR5>,SPAD <7> 
INPl <CSR')>,SPAD <0> 
I 300,BREG 

BREG,SPAD <0>,BR.SP / 

jSET IT IN RIGHT PLACE. 
?SRT IT IN RIGHT PLACE. 
JSET IT IN RIGHT PLACE. 
;SFT IT IN RIGHT PLACE. 
MEM, SPAD <1> JSAVE MEMORY LOCATION. 
# l4,MEM ;GET MASK 

MEMi-SPAD <0> JIN SPAD <0>. 
SPAD <0>,EREG,OUTl <11> ;SET OUT BA <16:17> 
SPAD <1>/MEM jRfcSTORE MEMORY LOCATION. 
" " " ?SET THE BUFFR POINTER. 



,?IS RCQLY FLAG SET? 



>YES, THEN SET LOWER BUFFER ADDRESS. 
JCLEAR TH" 



# 0/MLR 

SPAD <11>/BREG 

THE PAGE"REGISfER 

JSTART THE TRANSMISSION. 

n 2/MPR ;SET POINTER TO GOOD DATA BUFFER 

MEM,OUT0 <2>,MARINC ?LOAD LOW BYTE OF DATA. 

HEM,OUT0 <3> MARINC ?LOAD HIGH BYTE OF DATA. 

# 021,BREG JSET 

INPl <10>,SPAD <6> ;WORD XFR/ NPR OUT 

BREG,SPAD <0>i-OUTl <10> ; & NPl! RQ.. 

INPl <10>/BREG ;IS NPR DONE? 

2S jNOr CHECK FGR NON FX MKM. 

3$ ;YE§, PREPARE FOR NEXT. 

INPl <11>,BREG ;IS NON EX MEM. SET? 

4$ JYES, REPORT FATAL FRROR. 
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244 

m 

247 
248 

251 
252 
253 
254 
255 
256 

ill 

259 

m 

264 

ill 

267 
268 

k 

275 



007756' 
007760' 
gg7762; 

00?770' 
007772' 
007774' 
007776' 
010000' 
010002' 
010004' 
010006' 
010010' 
010012' 
010014' 
01001" 
01002 
01002 



1)10016' 
310022' 
310024' 
010026' 
010030- 

'imV' 

■ "036' 

hr- 

044' 
46' 

w- 

54' 



01 
01- 
010 
010-, 
01004, 
01004^ 
01QQ46' 
010050" 
010052 
01Q0S4 
010056' 
010060' 
010062' 
010064' 



3S: 



1$ 

# 2,BREC 
BREGrSPAD <0> 
NEXMLM 
STRTS 
SPAD <15> 

S?AD <6> 
SPAD <6> 
SPAD <7> 

sIaD <6>*BREG 
BREG,OUT0 <6> 
SPAD <7>4-BREG 
BREG,OUT0 <7> 
NPRATE 
RCVLP 
SPAD <7> 
"■ 4^BREG 



NO, '^M'T FOR NPR TO CLEAR. 
SET THE TYPE OF ERROR... 

, REPORT NON EX MEM ERROR. 
JWAIT FOR NEXT REQUEST 
JDECRSMSNT THK COUNT. 
JRRANCH IF IT «AS 0. 

JUPDATE RECEIVE BUFFER 

J POINTER. 

jUPDATE EXTENDED BITS IF CARRY SET. 
JSET THE ADDRESS. 

J SET THE OUTBA.. 



JWAIT TO MAINTAIN NPR RATE. 
JDO THE NEXT XFR. 
JSET BACK TO 377. 

# 4,BREG JLOAD LSB OF EXTEDED ADDRESS. 

INPl <11>,SPAD <0> JGET EXTENDED ADDRESS BITS. 

BREG,SPAD <0>,OUT1 <11> JINCREMENT EXTENDED BITS. 
8S JSAIT TO MAINTAIN RATE THEN PROCEED. 

SPAD <16> JDECREMENT THE MSB'S. 

RCVDNE JBRANCH IF DONE. 

65 JELSE/ DO THE NEXT. 

n 201/BREG JSET RD & RCV DONE BITS IN RREG. 

INPl <CSR2>,SPAD <0> JGET BSEL2. 

BREG/SPAD <0>£OUT1 <CSR2> jSET THE PITS IN BSSL2. 

INPl <CSR2>^BREG JDUMMY XFR TO CHECK lEO? 

IS JBRANCH IF lEO SET. 

STRTS J«AIT FOR NEXT REQUEST, 

ft 300,BREG JSET BR REQ. VCTR:=XX4 

ISPl ^CSR11>,SPAD <0> JGET MICRO-PROCESSOR MISC. REG. 
BREG^SPAD <0>,OUT1 <CSR11> JSET THE BITS IN MISC. REG. 



) 



RMCB DEC/Xl 

XKMCBO.Pll 



I SYSTEM EX 
12-0CT-7 



ERCISER MODULE 
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SEQ 0026 




2$: 



MOVE 

BB7 

MOVE 

MOVE 

AND 

MOVE 

MOVE 

$BR 



INPl <CSRll>,BnEG 
2$ ?H0, 
■ 277/BREG iSET 



SIS BR REQ CLEARED? 
SPIN ON IT 
TO CLEAR VCTR:=XX4. 



iNpl <CSR11>,SPAD <0> ;GET UPMS REGISTER... 
BREG,SPAD <0>/OUT1 <CSRll> ;CLEAR VCTR:=XX4.. 

I O^BREG SGET SET TO CLEAR XMIT FLA 

BREG#SPAD <10> JCLEAR XMlT FLAG. 
STRTS ;kAIT FOR NEXT REQUEST. 



LAG. 



i * 

!* TRANSMIT THE BUFFER FORM PDPll TO KMCll 

I* DOES ALL THE FUNCTIONS AS RECEIVE OPERATION AND 

I* ALSO CHECKS THE DATA. 



^MIT 



30S 010140 



MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
AND 

SHFBRT 

SHFBRT 

SHFBRT 

SHFBRT 

MOVE 

MOVE 



SPAD 
INPl 
INPl 
INPl 

Ifpi 
#30 



<4>,MEM JRESTORE MEMORY LOCATION. 
<CSK4>/OUT0 <4> ;GET LOW BYTE OF BUFFER ADDRESS. 
<CSR4>,SPAD <6> ;SET PARALLEL ADDRESS IN SCRATCH PAD. 
<CSR5>/OUT0 <5> ;GET HIGH BYTE OF BUFFER ADDRESS. 
<mh,mU <h iS|| P.^ULE^ .DURESS JN^gCRATCH PAD. 

;get the mask... 



<CSR 



regS§Pad^<o>,br.sp 



MEM, SPAD <1> 
it 14, MEM 



;PosiTiofi the bits. 

JPOSITION THE BITS. 
;POSITION THE BITS. 

JPOSITION THE BITS. 
JSAVE MEMORY LOC. 



KMCB D 
XKMCBO 
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ml 



1$: 

2$: 



3S: 



6$: 



8$: 



7$: 



5$: 



MOVE 

AND 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

OR 

MOVE 

BBO 

$BR 

MOVE 

BBO 

SBR 

MOVE 

MOVE 

CALL 

$BR 

MOVE 

HOVE 

SDEC 

BZ 

SINC 
SINC 
SADC 
BC 

MOVE 

MOVE 

MOVE 

MOVE 

CALL 

$BR 

SDEC 

MOVE 

MOVE 

SADD 

$BR 

SDEC 

BZ 

$BR 

MOVE 

MOVE 

MOVE 

AND 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

$IFEQ 



MEM#SPAD <0> /UfiT Ttic masmnij uiis. 
BREG,SPAD <0>,OUTi <10> ;LQAO EXTENDED ADDRESS BITS 
SPAD <1>,MEM ?RESTORE MEMORY, 
i 0,MLR ;CLEAR MEMORY LOCATION REGISTER 

I 0,MPR JCLEAR MEMORY PAGE REGISTER. 

INPl <CSR10>,SPAD <0> ;GET NPR CONTROL REGISTER. 
I 001,BREG JSET NPR RQ. BIT IN BREG. 

BREG,SPAD <0>,OUT1 <CSR10> jSET NPR RQ BIT. 

INPl <CSR10>,BREG ;IS NPR DONE? 

2S >N0, CHECK FOR NON EX. MEM 

35 lYFS, PREPARE FOR NEXT. 

INPl <CSR11>/BREG 



GET THE MASKING BITS. 



OF BUFFER 



1 2, BREG 
BREG, SPAD <0> 
NEXMEM 



JIS NON EX. MEM. SET? 

;report fatal error if it IS. 

... 

)SET 



OiKiD /HA 

INPO <0>,MEM HARINC 
INPO <1>^MEM MARINC 
SPAD <15> 

Had <6> 



REPORT NON EX. MEM. ERROR. 
WAIT FOR NEXT REQUEST. 

?LQAD THE DATA IN TO MEMORY. 

jload the data in to memory. 
;decrement the count 
;branch if it mas 0. 

? update the xmit 

• nil II n mi till 

jbuffer pointer.' 

;UPDATE extended address if CARRY SET. 

;SET outba address. 

;SET OUTBA ADDRESS. 

;WAIT TO MAINTAIN THE NPR RATE. 
;DQ THE NEXT XFR. 
;SET IT BACK TO 377... 

;LOAD LSB OF EXTENDED ADDRESS. 
SPAD <4> JLOAD BREG WITH EXTENDED BITS. 



SPAD <6> 
^PAD <7> 

sIaD <6>,BREG 
BREG,0UT6 <4> 
SPAD <7>,BREG 
BREG,0UT6 <5> 
NPRATE 
XMTLP 
SPAD <7> 
# 4, BREG 

INPl <CSR10>,SrAU ^.1^ Jbu. 

BREG, SPAD <4>,0UT1 <CSR10> INCREMENT THE EXTENDED BITS. 

8$ ;WAIT TO MAINTAIN RATE THEN PROCEED. 

SPAD <16> JDECREMENT THE MSB'S 

XMTDNE ;BRANCH IF DONE. 

6S ;ELSE DO THE NEXT. 



PPl 



PI <CSR6>,SPAD <15> 
5 77, BREG ;LOAD int 

INPl <CSR7>,SPA0 <16> ; 
BREGgSPAD <16>, SPAD <16; 

iRE6,siAD <1> 
BREG,SPAD <2> 
BREG,SPAD <3> 



# 2,BREG 

Breg,s"-- 



,SPAD <4> 

SPAD <1>,MLR 
SPAD <2>,MPR 
MEM,SPAD <5> 
SPAD <3>,MLR 
SPAD <4>,MPR 
SPAD <5>,MEM 



1$ 



GET LOW BYTE OF CHAR. COUNT. 
MASK. 

GET HIGH BYTE OF CHAR. COUNT. 

jLOAD HIGH BYTE OF CHAR. 

SET POINTERS TO DATA 
BUFFERS. 

SET POINTER TO GOOD. 



LOAD GOOD DATA. 



COMPARE DATA. GO TO IS IF GOOD 
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m 
III 

366 
367 
368 
369 
370 
371 
372 



0330' 

ir- 

034?' 
0344' 
0346' 
0350' 
0352' 
0354' 
0356' 



is: 



MOVE 
MOVE 
CALL 

ir 

SINC 
$ADC 
SINC 
SADC 
MOVE 
MOVE 



I 20#BHEG 
BREG,SPAD <0> 
DATERR 
SPAD <15> 

S?AD <3> 
SPAD <4> 
SPAD <1> 
SPAD <2> 
SPAD <1>,MLR 
SPAD <2>,MPR 



;SET THE TYPE OF ERROR... 
;REPORT 6aTA error. 

;decremknt count 

/branch if low byte circled 

/update good data 

jbuffer pointer 
jupdate data buffer pointer 
;and load it in mar. 
/set the mar... 
;set the mar... 
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0430' 
0432' 
0434' 
0436' 
0440' 
0442' 
0444' 
0446' 
0450' 
0452' 
0454' 
0456' 



2$: 
3S: 



4$: 
5$: 



CKDTLP 
SPAD <16 
35 
95 

i 205, BR 
IHPl <CS 
BREG/SPA 
INPl <CS 

sIrts 

# 300/BR 
IMPl <CS 
BREG^SPA 
|SP1 <CS 

# 277/BR 
INPl <CS 
BREG,SPA 
SPAD <10 
STRTS 



JCHECK THE NEXT CHAR. 
/DECREMENT MSB COUNT. 
/BRANCH IF DONE. 
/PREPARE FOR THE NEXT. 
EG /SET RD 0, XMIT DONE BA/CC /N BRE 

R2>4-SPAD <0> /GET BSEL2. 

_ .t. gj^g BSEL2. 



D <0>,00T1 <CSR2> 
R2>/BREG 

/YES, 
/MAIT 
EG / 
R11>,SPAD <0> ; 
D <0>£ OUTl <CSR11> 
R11>/BREG 



,IS lEO SET? 
GO INTERRUPT 
FOR NEXT INSTRUCTION. 



/SET BR R0,VCTP=XX4 
;TS BR RQ CLEARED 
/NO, SPIN ON IT. 
EG /SET TO CLEAR VCTR:=XX4. 

R11>/SPAD <0> /GET UPMS REGISTER... 
D <0>/OUT1 <CSR11> /CLEAR VCTR:XX4. 

> /SET XMIT FLAG 

/GO TO IDLE STATE. 



**************** ******************* 



r******* ********** 



SUBROUTINES 1. NPR RATE CONTROL 2. ERROR REPORTING. 

****************************************************** ******* 

1. NPRATE. THIS ROUTINE DELAYS THE NPR TO 
MAINTAIN THE RATE SET BY THE OPERATOR. 

THE SMALLEST UNIT FOR RATE IS 2 MICRO-SECOND WHICH 
IS SIMULATED IN SOFTWARE USING MICRO-PROCESSOR 
MOVE INSTRUCTION. DELAY COUNT IS SET AT THE TIME OF 
LOADING THE MICRO-CODE. 



fiPRATE: 

1$: 
2$: 
3$: 



BREG,SPAD <17> 
SPAD <13>/BREG 
BREG^SPAD <0> 
SPAD <14>,BREG 
BREG,SPAD <1> 
SPAD <0> 
25 
1§ 

SPAD <1> 
3S 

SPAD <17> PAGEO 



/SAVE THE RETURN ADDRESS. 
/GET NPR RATE COUNT... 

/COUNT MOVE BREG^SPAD <17> 

' JDECREMENT THE COUNT 

/BRANCH IF LOW BYTE IS COUNTED 
/CONTINUE 

/COUNT HIGH BYTE BY 1. 
/RETURN IF DONE. 
/CONTINUE. 
/RETURN. 



**************** 



r****** ****************************** ************ 



THIS ROUTINE REPORTS ERROR TO PDPll MONITOR PROGRAM. 

I. SOFT error:- (SPAD <4> BIT0:=1.) 

II. NON EXISTENT MEMORY:- (SPAD <4> BITl:=l.) 

III. DATA error:- (SPAD <4> BIT4:=1.) 
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461 
462 



64l6' 
0500' 
0502- 
0504' 
0506' 
0510' 
0512' 
0514' 
0516' 
0520- 

W- 

0526- 
0530- 
0532' 
0534' 
0536' 
0540' 
0542' 
0544' 
0546' 
0550' 

Im- 

0556- 
0560' 
0562' 
0564- 



Sfterr: 
nexmem: 
daterr: 



SFTERl: 
MEXMEl: 



DATERl: 

merge: 



2$: 
4$: 



000000 
000001 



move 
moye 

BBO 

BBl 

BB4 

MOVE 

SBR 

MOVE 

SBR 

MOVE 

MOVE 

OR 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

MOVE 

BB4 

$BR 

MOVE 

MOVE 

OR 

MOVE 

BB7 

MOVE 

MOVE 

AND 

$BR 

.WORD 

.END 



BREG^ 
SPAD 
SFTER 
NEXME 
DATER 

# 212 
MERGE 

# 242 
MERGE 
« 312 
INPl 
BRE6, 
SPAD 
BREG, 
SPAD 
BREG^ 
SPAD 
BREG, 
SPAD 
PREG, 
SPAD 
BREG, 
IHPl 
2S 
35 

# 300 
INPl 
BREG 
INPl 
4$ 

I 277 
INPl 
BREG, 
SPAD 




SPAD <17> 
<0>,BREG 



1 

,BRRG 
,BREG 
,BREG 

<CSR2>,SPAD 
SPAD <0> OUT 
<4>,RREG ; 
- <CSR4> 



;ENTRY FOR SOFT ERROR. 

;ENTRY FOR NON EXISTENT MEMORY. 

;ENTRY for DATA ERROR. 

JFIND THE TYPE OF ERROR. 

;SET UP FOR SOFT ERROR. 

JSET UP FOR NON EX MEM. 

>SET UP FOR DATA ERROR. 

;SET SFTER, CNTL/O/RD 0. 



<0> 



OUTl 

<5>#BREG 
OOTl <CSR5> 
<6>,BREG 
OUT! <CSR6> 
<7>,BRE.G 
OUT! <CSR7> 
<17>,BREG 
OUTl <CSR3> 
<CSR2>,BREG 



,BREG 

<11>,SPAD <0> 
SPAD <0> OUTl 
<11>,BHEG 

, BREG 

<CSR11>,SPAD 
SPAD <0>,0UT1 
<17> PAGEO 



;SET NEXMEM, CNTL/0,RD 0. 

;SET DATAERR,CNTL/0,RD 0. 

;GET BSEL2 

1 <CSR2> ;SET THE BITS IN BSEL 

LOAD ERROR DATA, 

JLOAD ERROR DATA. 

;LOAD ERROR DATA. 

JLOAD ERROR DATA. 

;LQAD ERROR DATA... 

JIS IE SET? 
;YES,G0 INTERRUPT. 
;Na,RETURN. 

;SET BR REQ.,VCTR:=XX4. 

;GET UPROCESSOR MISC. 
<ll> ;SET BR REQ.,VCTR:=XX4.. . 
;IS BR GRANTED? 
;NO,SPIN ON IT. 
;SET TD CLEAR VCTR:=XX4. 
0> ;GET UPMS REGISTER... 
<CSRli> ;CLEAR XX4. 

;RETURN TO MAINLAND. 
;MICR0-C0DE TERMINATOR.. 
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ACSR 

ADDR 

ADDR22= 

ASB 

ASTAT 

AWAS 

BASEl 

BEGIN 

BITO = 
BITl = 
BITIO = 
BITll = 
BIT12 = 
BIT13 = 
BIT14 = 
BIT15 = 
BIT2 = 
BIT3 = 
BIT4 = 
BITS = 
BIT6 = 
BIT7 = 
BITS = 
BIT9 = 
BRCR = 
BREAK$= 
BRl 
BR2 



QQQ102R 

000006R 

001000 

000106R 

000104R 

OOOllOR 

007276R 

OOOOOOR 

000001 
000002 
002000 
004000 
010000 
020000 
04OOQ0 
100000 
000004 
000010 
000020 
000040 
OOOIQO 
000200 

imn 

000011 
104407 
000012R 
000013R 




CSR^ 
CSR52 
CSR3 
CSR4 
CSR5 
CSR6 
CSR7 
DATCKS 
DATERR 
DATERS 
DATERl 
DATIN 
DATIO 
DATIl 



222# 
188| 
235| 
226| 

m 

291 
185# 
659 
235» 
23 5| 
2351 
235 
235 
235 
235i 
235 
235 
235 
235i 
235i 
235 
235 
235 
235 
1 

235 
190 
191 
235 
474 

Jill 

1 



1390 

1| 

if 

If 
235| 

1365 
235# 

1439 



551* 
357 


730* 
384 


418 








504* 

iil* 

1064# 
287 
660 
417 

m 


731* 

350 
671 
466 

ni 


370 
680 
677 
667 
872 


437 
710 
753 
718 
931 


438 
722 


483 
725 


345 
347 

314 
432 
417 
413 
669 


354 

320 


799 
427 








740 
720 
751 


743 
748 
752 


753 






723 
669 
930 
928 


679 

m 


753 
931 








437 
404 


43 8 
408 


514 


515 






1045# 












1374 












822# 
501* 

lilt* 


550* 


729* 








1145 


1148 


1164 


1179 




iiU 

1391 
1146 

1155 
1156 
1157 
1158 


1314 
1161 
1466 
1269 

1211 
1213 
1174 
1176 


1315 
1162 
1467 
1270 

1212 
1214 
1347 
1215 


im 

1271 

1294 
1296 
1452 
1298 


1342 
1276 

1379 

1295 
1297 

1349 


1277 
1380 

1448 
1450 

1454 


'm* 

1443# 













507 
728 



514 
734 



515 
738 



548 
754 



560 
819 



1280 
1381 



1281 
1445 



1318 
1 446 



1385 
1457 
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948* 



909 922* 
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StQ 0033 



MARINC= 
MASK 
MCDLP 
MERGE 

MES2 

MES3 

MES4 

MESS 

MICPC = 

HICRCD 



mm. 

°°2io4R 

SiaieeR 

Q02560R 
0Q|512R 

ooIpIr 

003322R 
000474 
007372R 
010000 
0Q4204R 
OOOOOQR 
000224R 
004000 
ly44Q3 
104402 
104401 
010460R 

?1o43Sr 



334 
200 

III 

1246 

im 



1137 



1323 



1233 

461* 
1152 
1444# 



1227 
959tt 



1230 
370 



1433# 
1408# 



1166 



1246 
1310 



1232 
548 



1325 
469* 



1258 
1357 



1311 
659 



1326 
470 



1323 
1360 



1358 
722 



1337 
1372 



1361 
725 



1373 
72B 



OBADp 
OBADl 



81? 



755# 



193 
224 



194 
226 



195 
227 



196 
229 



213 
230 



214 
231 



215 
235# 



217 



002634R 
Q07362R 
007364R 

mif 

001000 
002000 
003000 
000034R 

00?S?6R 
007316R 
000004 
005726 



000000 
OOQQOO 
000040 



973 
703* 

in 

1420 



390 
392 
647 



1173# 



981 
704* 

IW 

1468 



710 



705 
714 



653 
716 



1070# 
107li 
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235# 



SETUP! 

SETUP2 

SFTERR 

SFTERl 

SFTl 

SOFCNT 

SOFER|= 

SOFPAS 

SOFTl 

SOFTll 

SDFT2 

S0FT21 

SPOINT 



00. 
0024| 
0076* 



000020 
0Q0240R 

oogii2R 

000260R 
0QO252R 
0Q0254R 
000|02R 
0013" ~ 
0002 



mi 




599 



293 
3B4# 



849 
498 



892 
666 
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000266R 

QOOOOO 

000022 

000244R 

OOOOIOR 

000100 

003624R 

00Q104R 

003356R 

OOoil4R 



281# 
1142# 



316 
335 



662* 
385 

B66t 

m 



317 
337 

672* 



333 
338 



1247 



1273 



XDROPl 
XDR0P2 



001666R 
000005R 
010106R 
002502R 
000263R 
010266R 
010154R 



672 



309* 
1346# 
1338 



845 

545# 

356* 



1141 
1319 



338* 
464 
467 
1142 

1 SI 

1320 



676 

975# 

983# 

mi 
mi 



m 

1259 
1324 



BP 



m nrt m mi 

266 1267 1272 1273 



1266 
1332 



1278 
1345 



1284 
1346 



1316 
1362 
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$$$DER= 000001 



S$$SER= 000001 



ADC = 
ADD = 
ADD^C: 
AND : 
BBO = 



BB7 

BC 

BR 



.BSBRG= 
.BSIMH= 



010566R 

000100 

000000 

000020 

000260 

002000 

002400 

003000 

003400 

OOlOQO 

000400 



160000 
100000 



.BSMEM= 140000 



365 
437 
106| 

11321 
2031 

iW 

268 
293 

m 

353 
372 
409 
448 
46 3i 
106 

Uli 

212 
233 

11 

358 
385 
444 
460 
518 



1247 

1343 
1468 

II 

1189 
1247 
1317 
1365 
1437 
1# 



12411 
12691 



374 

439 

108 

121 

134. 

157| 

180 

207 

225 

244 

270 

295 

312 

336 

355 

378 

4U 

450 

466 

108 

121 

134 

158 

186 

214 

m 

295 , 
315 
341 : 
360 
389 
447 
463 
783 
1252 
1342 

180 
242 
438 
272 
149 
332 
150 
.259 
1365 

1468 
1142 
1204 
1253 
1320 
1374 
1439 



376 
441 
109# 
122# 
135' 
158 
181 
208 
226 
245 
_271 
1296 
-313 
337 
356 ^ 
379 

iU 

22 

_ 87 
1215 

ill 

-296.. 
1318// 
347ff 

390| 
448| 
465i 
830# 
1331 



1217 
1316 

1382 
1163 

1152 
1264 
1374 



1147 
1206 
1258 
1323 
1376 
1441 




1225 
1319 

1439 
1165 

1166 
1267 
1377 



1149 
1209 
1259 
1324 
1377 
1443 



1116» 
11291 
1146| 
11751 

usei 

12161 
1235# 
1261« 

mi 

1325| 
1350i 
13631 
1389S 
144S| 
1460l 

1116i| 
I29i 
148| 

1781 
2081 
228i 
255| 
28 1 
30 9 i 

355f 
379| 
.4361 
1455# 



1281 
1437 

1458 
1278 

1189 
1273 
1383 



1150 
1210 
1264 
1328 
1382 
1458 



1190 
1284 
1393 



1151 
1229 
1266 
1332 
1383 
1459 



1209 
1317 
1416 



1152 
1231 
1267 
1337 
1388 
1464 



1210 
1320 
1419 



1163 
1239 
1272 
1333 
1393 



1231 
1323 
1420 



1165 
1240 
1273 
1343 
1415 



1240 
1324 
1441 



1166 
1242 
1278 
1345 
1416 



30| 
48| 
76l 
- 89f 
1217ft 
1236| 
1262S 
128 23 

1326| 
13511 
1364# 
1390^^ 
1446« 
146lf 

mil 

1154 ^ 

mi 

123011 

1^82. 

1310>| 

1335 

1356 

1381 

1440# 

1456i 



1063|t 1070« 1071# 1072# 1105// 



1243 
1337 
1443 



1183 
1243 
1234 
1346 
1418 



1419 

13lff 
154f 
177| 

202| 

237| 
2631 
263« 
30^11 
333| 
352| 
365|t 
39l| 

1462# 

lir?<| 
_131(l 
1155Jf 

ml 
m 

384f 
_44 2| 
1457| 



1246 
133P 
1459 



1185 
1246 
1316 
1362 
1419 
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.CO 
-DBR 



.INC : 

.LORN : 

.MINUS: 

.MO ■• 

.OR = 

.PLUS : 

.SBR ■■ 



000400 
000400 



.DBRSH= 

.DBRSP= 
.DD = 

.DEC = 
.DMEM = 

.DNOP = 
-DOUT0= 



001400 
003400 
003000 

000160 
002400 

000000 
002000 

001000 
003000 



.DO = 000400 
.FO = 000020 



000060 
000240 
000360 
004000 
000300 
OOOQOO 
060000 



.SELA = 000200 
.SELB = 000220 



.J 

1246 
1315 
1378 
1451 
1# 

1145| 
1300| 

"If 

1234 

1386 
1141* 

im 

1305 
1344 
1370 
1414 

.J 

1296 
1385 

if 



If 
if 

1121 
1134 
1180 
1226 
1263 
1309 

133^* 
1451 
1# 



1183 
1418 

1106 

1189 

1254 

1318 

1381 

1453 

1218 

1180 

11611 

1308# 

1248 

1137 

1326 

1183 

1128 

1255 

1119 

1158 

1391 

1109 

1145 

1217 

1265 

1307 

1347 

1371 

1417 

1144 
1215 
1297 
1387 
1138 



1140 
203 
256 

1321 
384 

_455 

1219 
2V 
177# 
3141 
260 
182 
362 
185 
129 
257 
120 
161 
446 
110 
160 
222 
269 
308 
349 
375 
435 

1146 
1236 
1298 
1390 
1250 



1161 

1110 
1123 
1136 
1188 
1237 
1270 
1322 
1352 
1371 

nil 
m 

1455 
1110 



1143 

1205 

1258 

1323 

1387 

1457 

1220 

1300 

1180# 

1342f 

1265 

1183 

362 
130 
294 
121 
225 
448 
111 
174 
224 
270 

III 

379 
445 

1148 
1238 
1312 
1445 
1251 



1237 

nil 

1124 
1138 
1202 
1245 
1276 
1327 

mi 
uu 

1468 

nil 



1206 


1229 


1249 


1266 


1328 


1345 


1362 


1367 


1376 


1146 


1148 


1154 


1159 


1161 


1162 


1164 


1175 


117? 


207 


1209 


1216 


1225 


1228 


1236 


1238 


1241 


1244 


261 


1268 


1271 


1274 


1277 


1279 


1282 


1299 


1313 


,333 


1335 


1337 


1340 


1348 


1351 


1355 


1363 


1365 


389 


1410 


1412 


1436 


1440 


1442 


1444 


1447 


1449 


460 


1463 


1465 














1221 


1301 


1302 


1303 


1304 











1183# 
1350# 
1327 
1184 



131 
296 
_122 
1237 
; 450 
'112 
176 

m 
m 

380 
446 

160 
241 
315 
457 
329 



1185| 
13621 
1339 
1185 



1132 
1334 
1123 
1263 
1452 
1113 
1177 

\m 

1385 
1461 

1162 
1262 
1318 
1461 
1330 



1217|f 
1380# 
1344 
1186 



1225|f 
13861 
1366 
1202 



1270 1276 


1314 


1380 


1112 


1113 




1114 




L115 


1125 


.126 




127 




128 


1139 


i^Q 




145 




155 


1203 


205 




208 




217 


1248 


.250 




251 




252 


1281 


.283 




293 




300 


1329 j 


.330 




331 




333 


1354 


356 




357 




358 


1373 


375 




380 




386 


1435 


436 




446 




L447 


1462 


467 










1203 


205 


1226 


1228 


1361 


L372 


1373 


1410 


1112 1113 


1114 


1115 



}391# 

1375 

1223 



1133 


1134 


1135 


336 






.124 


1125 


1126 


270 


1276 


1281 


454 


1456 


1462 


114 


1115 


1116 


179 


1180 


1181 


245 


1248 


1250 


280 


1281 


1283 


.327 


1329 


1330 


354 


1356 


1359 


.386 


1390 


1391 


462 


1466 


1467 


1164 


1174 


1176 


1269 


1271 


1275 


L325 


1326 


1341 


1463 


1466 




1368 


1370 





1306 

1116 
1129 
1156 
1218 
1254 

im 

1360 
1391 
1448 

1254 
1412 



1263f 
14461 
1392 
1226 



1136 

1127 
1308 
1467 
1117 
118R 
1251 
1295 
1331 



1277 
1347 



1446 

1117 
1130 
1157 
1219 
1255 
1302 
1335 
1361 
1392 
1449 



127 01/ 
14621 
1414 
1293 



1145 
1314 

1119 
208 
252 
297 
339 
366 
409 



1211 
1280 
1349 



1462 

Ilia 

1131 
1158 
1220 
1256 
1303 
1336 
1364 
1409 
1450 



127611 
1467# 
1417 
1306 



1155 
1342 

1138 
1212 
1260 
1298 
1341 
1363 
1411 



1212 
1294 
1379 



119 
132 
161 
221 
257 
304 
339 
366 
410 
451 

1309 
1447 



1156 
1380 

1139 
1214 
1262 
1300 
13 42 
1369 



1213 
129f 
IS'^l 



ll2n 

-133 
177 
2?5 
260 
30P 
342 
366 
411 
452 

1333 
144 9 
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.SINO 
.SINl 



020000 
120000 




OOoi40 




1125 
1156 
1234 
1336 

\m 

1223 
1299 
1365 

1160 

im 

1463 
1222 



H10« 
11231 

11491 
11631 
11831 
1207| 

I237| 
1250| 

1297| 
13145 
13271 
1340| 

mi 

13791 
13921 
i420| 
1447| 
1460g 



111 



mi 

1255 
1353 
1456 
1154 
1230 
1310 
1384 

1164 
1269 
1341 



mi 

1257 
1354 



1232 
1311 




1129 
118P 
1283 
1356 

1175 
1235 
1313 
1440 

1176 
1275 
1349 



127 
140 

AW 

'm 

228 
241 

P' 

280 
305 
318 
331 
34411 

Wo 

383 
1411 

"438 
.451 
1464 



nil 

1301 
1359 

1178 

mt 

1442 

1179 
1277 
1379 



115 

128 
141 
155 
175 
188^ 
212 
229 
242 
255 
268; 
281 
306 
319 
332 
345 

m 

384 I 

All 

439 

452 

4651^ 





1133 
1220 
1304 
1411 

1187 
1261 
1340 
1465 

1213 
1295 
1387 



118,, 
131il 
_144" 
.158 
' 178 
202 
1215 
' 237 
245 
258 
271 
204 
309 
322 
335 , 

361 
374 
387 
415 

455S 
46eff 



000000 
010566 



000 
001 



ERRORS detected: 

default globals generated: 

xkmcbo,xkmcbo/sol/crf:sym=ddxcom,xkmcbo 
run-time: 20 22 1 seconds 
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RUN-TIME RATIO: 174/44=3.9 
' (1 



CORE used: 9K (17 PAGES) 




laso 



DIAGNOSTIC ENGINEERING 

DECOD DEPOS SUBMISSION □ 



FOR RELEASE ENG. USE 
□ NEW O^"'^'^*^^ O DELETE 



PRODUCT IDENTIFICATION 



iVlD 



LIBRARY 


PRODUCT NUMBER 


REV 


PATCH 


ECO 
TALLY 


PRODUCT DATE 




zz 


CXKMC 


B 


1 


Si/ 


DO MMM YY 

1? I ?9 


1 



STATUS 



OBSOLETE X|g| I I r 



DISTRIBUTION 



1ST COPY 
RIGHT YEAR 



LAST COPY 
RIGHT VeaR 



1979 



CXKMCBl KMC-11 MODULE 



AUTHOR D, BUTENHOF | '^Ai0^y^G^y|>,p Qj^p 



maintainer 



D. BUTENHOF P"°'^'^'^"^^^'^'ljf.^^'feUTENHOf 



PRODUCT COMPONENTS I 



CK 


DESCRIPTION 


PRODUCT NO. 


REV 


CK 


DESCRIPTION 


PRODUCT NO. 


REV 




DOCUMENT 








INDEX 








LISTING 








SOURCE MEDIA , 








OBJECT MEDIA 








TEST MEDIA 






X 


DECO 


AF-E95J2(B-M1 













































PRODUCTS OBSOLETED (other than previous version) 




PROCESSORS PRODUCT OPERATES WITH (Enter all applicable 2 digit codes representing the Processor the product operates with. See separata instructions.) 



























































OPERATIONAL CODES (Enter all applicable 2-digit codes that describe the product. See separate instructions.) 


















































1 








DEVICE AFFECTED 


DEC/Xll 




ImULTIMEDIA affected? n YES 


UNO] 


KIT NUMBERS 


ZJ130'-RB 














ZJ129-RZ, 


FR 













act/apt/xxdp 
information field 

problem reports closed: 



ACT 

SEQ NUMBER 



ACT/XXDP APT COMPATIBLE? 

COMPATIBLE? 

Xlv Rn f-lN 



1ST PASS RUN TIME 



"1 SECONDS 



SUBSEQUENT 
PASS RUN TIME 
— I SECONDS 



DECO/DEPO INFORMATION 



PROBLEM: 



ERRORS WHEN BUFFERS OVERLAP 32K BOUNDARY, DUE TO MICROCODE BUGS. 



SOLUTION: 

PATCH THE FOLLOWING MODULE LOCATIONS 



DEPO PATCH AREA 



CHANGE LOC 



FROM 



TO 



CHANGE LOC 



FROM 



TO 



10024 
10246 
10254 



63167 
63167 
61j2fl4 



63207 
63207 
61010 





SUPPORT ENGINEER 



CHARGE DECO/DEPO TO 
DISCRETE PROJECT NUMBER 



©ATE: , 3_ 



DATE: 




FIELC 



DATE 



WAIVERING MANAGER 



DATE: 



COORDINATION NO.. 



